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16 PCW-TT 
… Vive le PCW-PA0! 


Convivialité 

C'est d'une simplicité déroutante! 

Utilisant les touches du clavier ou 
une souris AMX, Kempston ou Elec- 
tric Studio, vous déplacez un poin- 
teur visualisé à l'écran et “cliquez” 
sur l'option sélectionnée. Des menus 
déroulants vous donnent instan- 
tanément accès à toutes les pos- 
sibilités de DTA-PAO. 


Fonctionnement du logiciel 


Vous démarrez en préparant votre 
mise en page. Vous décidez du 
nombre et de la largeur des colon- 
nes de texte, ainsi que de la pos- 
ition des fenêtres qui contiendront 
des graphismes, des titres et des 
sous-titres. 

Vous chargez votre texte préparé 
avec LocoScript ou tout autre logi- 
ciel de TT capable de produire un 
fichier ASCII. L'Editeur-Texte de 
DTP-PAO vous permet de créer un 
texte ‘’justifié”’ avec des caractères 
gras ou italiques affichés comme 
ils seront imprimés sur papier. 

Vous pouvez créer des graphi- 
smes avec l'Editeur-Graphique très 
puissant de DTP-PAO. Vous 
dessinez des lignes, des boîtes, des 
triangles et des ellipses. Vous 
remplissez des secteurs ou vous 
peignez à main libre en vous serv- 
ant d'un des 16 motifs disponibles. 
A l'aide d'une ‘loupe’ vous retou- 
chez votre dessin point par point. 

Il y a même un Editeur-Police 
(éditeur de fontes) qui vous permet 
de créer vos propres polices de 
caractères pour vos titres. 

Quant tout est prêt, vous pouvez 
faire paraître à l'écran votre chef 
d'oeuvre en miniature, et l’imp- 
rimer. 


Voilà ce que vous aurez ... 


Une disquette double face qui con- 
tient les trois programmes prin- 
cipaux, une sélection de ‘’Clip-Art” 
(fichier de graphismes tout prêts), 
des polices de caractères supplé- 
mentaires, une page d'exemples, 
et un manuel d'instruction très 
complet. 


DTP PAO 395F 


Souris AMX 695F 


MasterScan 695F 


Digitaliseur VIDI 
1400F 


est mort! 











DTP-PAO, adaptation de ‘The Desktop Publisher’ de Database Softwar 
vous sort du carcan du TT (Traitement de Texte) et vous ouvre un potenti 
de graphismes sur votre PCW. A l’aide de DTP-PAO vous avez la possibilt 
de créer vos propres prospectus, publicités, en-têtes, bulletins d'inform: 
tions, puis de les imprimer avec des titres, des textes et des graphisme 
disposés exactement selon la mise en page que vous avez choisie. 
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Après des mois de recherche, le CLUB de l'ECHO DU PCW est 
enfin en mesure de vous présenter des rubans imprimante de 
qualité exceptionnelle, d'une longévité et d'un noir intense 
comme vous ne les avez jamais vus! 


RUBAN PCW 8256/8512 


INCROYABLE! 
Par 3 Pièces: 65f l'unité 


MEMBRES DU CLUB ECHO: 60 * f l'UNITE! 


Délai de livraison maximum: 10 jours 








(*) Ce prix est exclusivement réservé aux membres du club 
ECHO DU PCW 
Es... ES LS SEE EEE. 
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4 (France exclusivement) 
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(d Je commande par la présente: X 3 Rubans à 195F les 3 soit... XTOS EF =.:::..22. 

2 X 3 Rubans à 180 F les 3 soit X 180F =... (*) 
: j'ajoute 15 F pour les frais de port et d'emballage 
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* Adressez votre règlement à l'ordre de LOGI'STICK éditions 
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en page centrale. 
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Des périphériques 

à l'infini. 

Calvacom multiplie les possibilités de 
votre micro ordinateur. Derrière votre 
écran, vous retrouverez une équipe 
d'une trentaine de personnes, une 
puissance informatique de plus de 7 
millions de francs et un accès direct à un 
réseau mondial d'information et de 
communication. Tout cet ensemble 
contribue à faire... 


Une autre communication. 
Plus rapide, plus efficace, 
plus complète. 
Simplicité d'utilisation : Un seul geste 
suffit pour vous brancher sur le réseau : 
composer un numéro de téléphone. 
Aucune compétence informatique ou 
formation préalable ne sont requises 
grâce à trois signes qui viennent à votre 
secours chaque ‘fois que vous le désirez : 
Plus d'informations : l'ordinateur 
vous vient en aide, vous indique 
où vous en êtes et vous offre 
différents choix possibles pour continuer. 


+ Pour corriger la dernière 


réponse que Vous avez 
enregistrée ou pour revenir 
en arrière. 
Pour changer de service. Et si 
1) vous voulez passer derrière le 
décor et comprendre toutes les 
finesses de CalvaCom, vous pouvez 
toujours demander le Manuel d'utilisation 
de CalvaCom. 


Transformez votre micro 
en place boursière 


UNE PRISE DIRECTE AVEC 
L'ACTUALITE FINANCIERE ET VOTRE 
AGENT DE CHANGE. 

Qu'est-ce qui distingue les grandes institutions d'un 
investisseur moyen sinon leur accès plus rapide 
aux informations et services des places 
financières ? 


AJOUTEZ UNE 
NOUVELLE DIMENSION 
À VOTRE MICRO 


Maintenant CalvaCom propose ces mêmes 
outils professionnels à des prix abordables. 
même pour des particuliers. 


LES DERNIERES COTATIONS PARMI 
LES 40000 VALEURS DU MONDE 
ENTIER. 

Couvrant 250 places financières dans 40 pays, 
CalvaCom vous tient au courant des 
évolutions des valeurs mobiles qui vous 
intéressent sans vous noyer dans une marée 
d'informations qui ne vous concernent pas. 
Avec votre micro-ordinateur, vous pouvez 
même intégrer les valeurs sélectionnées dans 
un tableur pour opérer immédiatement vos 
calculs. 


Vous pouvez : 

° Interroger le service à partir du nom ou du 
code R.G.A. pour déterminer leur lieu de 
cotation, leur cours et l'historique de leur 
performance pendant les cinq dernières 
bourses; 

e Constituer des listes de valeurs, l'évaluation 
de celles-ci se faisant automatiquement. 


L'ACTUALITE FINANCIERE 

A LA SECONDE 

Premier informé, premier à agir : avec le 
service économique de l'A.F.P. (Agence 
France Presse), c'est toute l'actualité 
intéressant les investisseurs que vous pouvez 
consulter en temps réel. 


PASSEZ VOS ORDRES DIRECTEMENT 


A PARTIR DE VOTRE MICRO OU 
MINITEL 

Plus besoin de vous impatienter au téléphone 
ou d'attendre les confirmations de vos télex. 
En ouvrant un compte à la Charge Boscher, 
vous pouvez passer vos ordres -avec bien sûr 


accusé de réception et par la suite recevoir. 


VOS AVIS D'OPERE LE JOUR MEME 
IL est important de recevoir des informations 
financières rapidement -surtout lorsqu'il s'agit 
des vôtres. 


CONSEILS ET ECHANGES AVEC 
D'AUTRES INVESTISSEURS 

lieu de communication et d'informations, le 
réseau informatique CalvaCom est aussi un 
point de rencontre pour ceux qui font la 
bourse. Ainsi vous pouvez bénéficier des 
conseils des professionnels de la bourse. 











LA BOITE A 
COMMUNIQUER... 
MAINTENANT : 


La ‘Boîte à communiquer‘' est votre 
passeport pour l'univers CalvaCom. 
Avec lui vous allez découvrir un réseau 
de communication unique en France. 
Avec lui votre micro-ordinateur ou 
Minitel se transformera en puissant 
instrument de communication 
interactive. 

Cet ensemble vous donne droit à trois 
heures de navigation sur le réseau et 
contient votre code secret d'accès à 
tous les services (sauf l'envoi des Télex) 
que vous pouvez utiliser tout de suite. 
















Ce kit contient : 

- 3 heures de connexion avec CalvaCom, 

- Un manuel de présentation des services et 
d'utilisation du réseau votre guide de route 

- Votre code secret d'accès à tous les 
services 

- La calculatrice CalvaCom 

- L'accord CalvaCom, bien sûr. 











N'hésitez pas et commandez dès 
aujourd'hui la boîte à communiquer au 
prix de 350 F ou 320 F si vous êtes 
membres du club ECHO 












Bon à découper ou à photocopier et à retourner à 
LOGI'STICK CAPN LE BONAPARTE BOITE 49 
93153 LE BLANC MESNIL CEDEX 
{offre réservée à la France métropolitaine exclusivement) 
Veuillez me faire parvenir par retour de courrier la boîte 

à communiquer. 
Je suis : MME, MELLE, MR 
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MEMBRE DU CLUB [OUI EINON si OUI indiquez le 
numéro de votre carte: CE 
Ci-joint mon règlement* par 
[O CCP ©] CHEQUE 
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ENFIN SERIEUX... 


P oint de délire, point de romance, ce mois- 
ci je serai raisonnable. 

Ne croyez pas que ce soit un caprice passager ou 
même une crise de remords subite accompagnée 
d’une prise de conscience aiguë qui me pousse à 
renier mon irréfragable envie de vous détendre 
les neurones (d'étendre aussi !). 

Rien de tout cela. Je brûlais de vous dire 
simplement, qu'après deux ans d’existence, 
notre bien aimé PCW commence enfin à 
bénéficier du regard un peu moins dégoûté de 
l'élite savante qui hante les corridors du 
royaume binaire. 

Ils ont mis tout ce temps pour admettre que le 
joujou attardé faisait le bonheur de milliers 
d'utilisateurs, de sociétés, voir d’administrations 
(merci BOND !). 

Il a fallu se battre, que dis-je, accepter de passer 
pour des malades mentaux pour s’imaginer que 
la bête allait survivre sous le couperet meurtrier 
du successeur PC. Nous l’avons fait, tous 
ensemble comme nous nous y étions engagés et 
le résultat éclate aujourd’hui : le PCW n’a pas 
besoin de remontant et il se porte comme un 
charme. Mieux, on lui concède une 
descendance. 

Et quelle filiation ! Un engin qui s'appelle PCW 
9512 et qui ressemble comme un frère à un PC 
1512... Vous voyez le rapport... Subtil 
subterfuge pour qui n’y prête attention. Et mon 
imagination toujours fertile de me sussurer : 

« Puisque les irrascibles du PCW ne se laissent 
pas convaincre par la force de l’évidence à 
laquelle tout le monde croyait dur comme fer, 
pourquoi n’y viendraient-ils par la ruse. ». 
Comprenne qui veut, mais n'oublions pas la 
nouvelle devise des connaisseurs : 

Habillé comme qui vous savez, nommé comme 
presque qui vous savez... Mais ne vous y 
trompez pas, c’est un PCW ! 





Gilles PROBST 


















































QUOI DE NEUF DOCTEUR? 


Médecins et pédiatres peuvent se féliciter d’avoir un 
éditeur dévoué à leur cause. En effet, TELESOFT 
s'étant assuré la compétence d’une équipe de 
médecins vient de mettre au point une gamme 
cohérente de logiciels qui leur sont destinés et qui, 
compte tenu du prix du matériel, sont promis à un 
bel avenir. 


Le premier, MEDITOR s'adresse aux généralistes et 
fonctionne sur un PCW 8512. Ce programme 
complet se charge de problèmes aussi variés 
qu'indispensables, citons pour exemple: 

- Gestion du fichier patients 

- Fichier Thérapeutique incluant un dictionnaire de 
médicaments permettant recherches par spécialité 
médicale et classe thérapeuthique, mais aussi de 
connaître les contre-indications et les intéractions. 

- Editions des ordonnances avec heures de prise et 
effets secondaires, calcul des doses, doses 
moyennes et maximales et posologie progressive. 

- Editions de certificats en tout genre, prescriptions 
diverses pré-établies qu’il ne reste plus qu’à 
compléter et différentes demandes d'examens types 
les plus courants (radio, analyse, etc...). 

- Comptabilité du type recettes/dépenses avec cumuls 
mensuels et par type d'actes. 


La version PEDIAMASTER destinée plus 
particulièrement au pédiatre, est en fait une version 
modifiée de MEDITOR mais qui inclut un suivi plus : 
adapté aux jeunes patients (exemple: suivi de la 
croissance ou antécédents néo-natals). 


Enfin pour compléter sa gamme, TELESOFT propose 
MEDIFISC qui se charge de gérer les finances d’un 
cabinet médical en incluant une comptabilité 
recettes/dépenses, les calculs d’amortissements pour 
les années antèrieures, gère un compte des sommes à 
réintégrer par chaque dépense enregistrée par 
l'utilisateur et synthétise le tout par des tableaux 
détaillés permettant une véritable analyse de gestion. 
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N'E.: 


W,:S 


MEDIFISC fonctionne sur PCW 8256 et 8512. 





Pour plus d'informations, contactez TELESOFT à : 
3 Rue de l’Arrivée - BP 112 

75749 PARIS CEDEX 15 

TEL (1) 45.38.71.00 


COMMENT CA WALBASIC? 


WALDATA, firme jeune et pleine d’ambition propose 
WALBASIC pour étendre les possibilités du BASIC 
MALLARD. Appelés par un chargeur basic, les codes 
viennent s'implanter en haut de la mémoire et les 
nouvelles fonctions auxquels ils donnent accès sont 
sollicités par d’indispensables CALL suivis des 
paramètres nécessaires. Exemple : Le tracé d’un 
rectangle s'obtient par : 

300 X = 100:Y = 100:CALL BOX (X,Y) 





Dans le même esprit, WALBASIC propose une 
quarantaine de routines réparties entre le graphisme, 
la gestion de la mémoire et la gestion des disquettes. 


A signaler enfin l’effort notoire de WALDATA dans 
la présentation et la clarté du manuel qui sert par la 
même occasion de pochette à la disquette. 


Pour plus d'informations, contactez WALDATA à : 
7 SQUARE SURCOUF 

91350 GRIGNY 

TEL (1) 69.06.56.48 


NE COUPEZ PAS!!! 


Plus de coupures intempestives, plus de fichiers 
détruits par les baisses de tension, plus de drames 
informatiques du fait des grèves et des orages. La 
solution véritablement miracle vient d’être trouvée 
par HITECH qui propose l'alimentation de secours la 
moins chère du marché. Spécialement conçue pour 
les PCW 8256 et 8512 (et bientôt 9512), ce 
régulateur s’installe en quelques minutes et garantit 
des heures d'utilisation sans la moindre source 
extérieure d'alimentation. PRO-TECH puisque c’est 
son nom, impose cependant deux contraintes : la 
première est de se procurer une batterie de moto 
(volume assez réduit- prix environ 200 F) et la 
seconde est d'accepter de se passer de l’imprimante 
pendant le temps que dure la coupure d'électricité. 


Le prix fixé à 1500 F permet aux entreprises 
soucieuses d'éviter les catastrophes, d’en équiper au 
moins deux à trois postes de travail pour le prix 
d’un onduleur classique. 


Pour plus d'informations, contactez DDI à: 
CENTRE D'AFFAIRES PARIS NORD 

LE BONAPARTE BOITE 37 

93153 LE BLANC MESNIL CEDEX 

TEL (1) 48.67.28.44 


















PROGRAMMATION DBASE II 


DBASE Il 


par Patrice BIHAN 


V oici la suite des modules à ajouter à 
notre système-expert en chaînage 
avant d'ordre O. 


-MODULE EFFA_F 


ERASE 
USE FAITS 
à 5,10 SAY ‘’ ****EFFACEMENT DE FAITS ****"" 


STORE ‘'O'' TO TEST 
DO WHILE TEST = ‘’O’ 
à 10,10 SAY ‘’ Entrez le numéro du fait à effacer’ 


INPUT TO N 

GO N 

8 ‘’ Voici le fait: ‘ 
DISPLAY 


8 ‘’ Voulez- vous l'effacer réellement O/N ‘' 
WAIÏT TO EFF 


IF (EFF) = 0" 
DELETE NEXT 1 
PACK 
8 ‘’ Le fait n° ‘’N, ‘’ est effacé’ 
USE FAITS INDEX INDFAIT 
REINDEX 
ENDIF 


à 20,10 SAY ‘’ Voulez vous continuer à effacer O/N'' 
WAIT TO TEST 

STORE I(TEST) TO TEST 

ERASE 

ENDDO 


RETURN 








- MODULE MODIF_F: 
ERASE 

à 5,10 SAY ‘’ ****BASE DE FAITS ***"! 
STORE ‘‘O'' TO TEST 

DO WHILE TEST = ’O'' 


à 10,10 SAY ‘’ Entrez le numéro du fait à modifier’ 
INPUT TO N 

STORE FAIT TO F 

à 15,10 GET F PICTURE ‘’ILILLLLLEUUEEEENUEETEENNEE"" 
READ 

REPLACE FAIT WITH F 

à 20,10 SAY''Voulez vous continuer la modification O/N'' 
WAIT TO TEST 

STORE I{TEST) TO TEST 

ERASE 

ENDDO 


RETURN 












INITIATION 


1° épisode 


Système-expert (Seconde partie) 





- MODULE LISTE__F 


ERASE 


ge !! LRLLLELEE) LISTE DES FAITS LRLELELELTZ] 
d 


GO TOP 
LIST 
RETURN 



























































- MODULE GES_ F: 


ERASE 

SELECT PRIMARY 
USE FAITS 

STORE ‘‘O’' TO TEST 


DO WHILE TEST=’'O" 


à 5,10 SAY ‘’ ***GESTION DE LA BASE DE FAITS * * *’’ 
à 7,10 SAY ‘'A Ajout de fait’ 

à 9,10 SAY ‘M Modification de fait’ 

à 11,10 SAY ’E Effacement de fait’ 

à 13,10 SAY ‘’L Liste des faits’’ 

à 18,10 SAY ‘’ Entrez votre choix'' 


WAIT TO CHOIX 
DO CASE 


CASE I(CHOIX) = ‘’A' 
DO AJOUT_F 

CASE I(CHOIX) = ‘’M' 
DO MODIF_F 

CASE (CHOIX) = ‘’E” 
DO EFFA_F 

CASE I(CHOIX) = ‘’L 
DO LISTE_F 


ENDCASE 
DO CONTINUE 


ERASE 
ENDDO 
RETURN 
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MODULE GES__R: 


ERASE 

DO INITIAL 

SELECT SECONDARY 
STORE ‘'O’' TO TEST 


DO WHILE TEST="O"" 


à 5,10 SAY ‘’ ****GESTION DE LA BASE DE REGLES **”*" 


à 7,10 SAY ‘A Ajout de règle‘ 

9,10 SAY ‘M Modification de règle‘ 
11,10 SAY ‘’E Effacement de règle’’ 
13,10 SAY ‘’L Liste des règles’’ 
15,10 SAY ‘’P Permutation de règles’ 
à 18,10 SAY ‘’ Entrez votre choix‘ 


WAIT TO CHOIX 
DO CASE 


CASE I[CHOIX) = ‘A’ 
DO AJOUT_R 
CASE I(CHOIX) = ‘’M'’ 
DO MODIF_R 
CASE I[CHOIX) = ‘’E'’ 


DO EFFA__R 


CASE I(CHOIX) = ‘’L'’ 
DO LISTE_R 


CASE (CHOIX) = ‘’P’’ 
DO INVER_R 
ENDCASE 


DO CONTINUE 


ERASE 
ENDDO 
RETURN 


à 
à 
à 
à 


MODULE EFFA__R: 
ERASE 


à 5,10 SAY 
!**+**EFFACEMENT DE REGLES* * * *‘! 


STORE ‘’O'' TO TEST 
DO WHILE TEST = ‘’O‘ 


à 10,10 SAY 

!’ Entrez le numéro de la règle à effacer’’ 
INPUT TO N 

GON 


LEA 


8 ’ Voici la règle: 
DISPLAY 


8 ‘’ Voulez- vous l’effacer rééllement O/N ‘’ 


WAIT TO EFF 


IFI(EFF) = ‘’O’’ 

DELETE NEXT 1 

PACK 

8 ‘’ La règle n° ‘’,N, ‘’ est effacée’ 
ENDIF 
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à 20,10 SAY 

!! Voulez vous continuer à effacer O/N ‘’ 
WAIT TO TEST 
STORE I(TEST) TO TEST 
ERASE 


ENDDO 
RETURN 


- MODULE MODIF__R 
ERASE 


à 5,10 SAY 
1! #+*+*++#+MODIFICATION DE REGLES* * * * * *‘’ 
STORE ‘'O‘' TO TEST 


DO WHILE TEST = ’’O‘ 
ERASE 
INPUT ‘’ Entrez le numéro de la règle 
à modifier ‘’ TON 
GON 


STORE ‘ !’ TO CLAUSE 
STORE CLAUSE TO CONCLUSION 
STORE CLAUSE TO CONDITION] 
STORE CLAUSE TO CONDITION2 


STORE CLAUSE TO CONDITION3 
STORE CLAUSE TO CONDITIONA 


à 6,10 SAY ‘’Conclusion’’ GET CONCLUSION PICTURE 
ATEN" 

à 10,10 SAY ‘’ est vraie SI ‘’ 

à 10,10 SAY ‘’Cond 1 ‘’ GET CONDITION] PICTURE 
IT" 

à 11,10 SAY ‘’Cond 2 ‘’ GET CONDITION? PICTURE 
A LTETETTTE LEE EETTTELETETETITE RS 

à 12,10 SAY ‘’Cond 3 ‘’ GET CONDITION PICTURE 
LEE" 

à 13,10 SAY ‘’Cond 4 ‘’ GET CONDITIONA PICTURE 
ADM" 


READ 


à 20,10 SAY ‘’ Voulez vous continuer 
à modifier des règles O/N ‘* 

WAIT TO TEST 

STORE I{TEST) TO TEST 

ERASE 


ENDDO 
RETURN 


MODULE LISTER: 


ERASE 

e!! LELLLLLEE. LISTE DES REGLES LELLEESELE TZ] 
8 

GO TOP 

LIST 

RETURN 
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MODULE INVER__R: 


ERASE 

81! *+++ PERMUTATION DE REGLES ****/’ 
STORE 0 to N] 

STORE 0 to N2 

à 10,10 SAY “Pour permuter deux règles, il faut entrer leur numéro” 
à 12,10 SAY ‘’Première règle: ‘’ GET N1 PICTURE ‘’***"’ 
à 12,50 SAY ‘’Seconde règle : ’ GET N2 PICTURE ‘’***" 
READ 

GO N] 

8 ‘’Première règle" 

DISPLAY 

STORE CONCLUSION + CONDITION + CONDITION2 + CONDITION3 + CONDITION4 TO REGLE! 

& !’Seconde règle’ 

4GO N2 

DISPLAY 

STORE CONCLUSION + CONDITION 1 + CONDITION2 + CONDITION3+ CONDITION4 TO REGLE? 

GO N1 

REPLACE CONCLUSION WITH S{REGLE2,1,30) 
REPLACE CONDITIONT WITH SIREGLE2,31,30 
REPLACE CONDITION2 WITH SIREGLE2,61,30 
REPLACE CONDITION3 WITH SIREGLE2,91,30 
REPLACE CONDITIONA WITH SIREGLE2,121,30) 
GO N2 

REPLACE CONCLUSION WITH S{REGLE1,1,30) 
REPLACE CONDITIONT WITH S RUE 18130 






















REPLACE CONDITION2 WITH SIREGLE1,61,30 
REPLACE CONDITION3 WITH SIREGLE1,91,30 
REPLACE CONDITION4 WITH SIREGLE1,121,30) 
2 ‘’Fin de la permutation‘’ 


RETURN 


MODULE EXPERT : 
ERASE 
SET TALK OFF 
DO WHILE T 
à 4,10 SAY "*** SYSTEME EXPERT d'ordre 0 en chaînage avant * **’ 
à 5,10 SAY Patrice Bihan You pour l'Echo du PCW" 
à 10,10 SAY "F Gestion de la base de faits’! 
à 12,10 SAY"R. 
à 14,10 SAY "D és 
û … Création de la base de connaissances" 
… Quitter DRASE" 
} Abandon du traitement en cours’’ 
à 22,10 SAY ‘ Entrez votre choix" 
WAIÏT TO CHOIX 
DO CASE 
CASE I(CHOIX) = ‘’F' 
DO INITIAL 
DO GES__F 
USE FAITS INDEX INDFAIT 
REINDEX 
CASE I(CHOIX) = ‘’R'’ 
DO INITIAL 
DO GES_R 
CASE I(CHOIX) = ‘’D’’ 
DO INITIAL 
DO CHERCHE 
CASE I(CHOIX) = ‘’C'' 
DO CREATION 
DO INITIAL 
CASE I(CHOIX) = ‘’Q‘' 
CLEAR 


QUIT 
CASE I(CHOIX) = ‘’A 
CLEAR 
CANCEL 
ENDCASE 
ERASE 


ENDDO 
RETURN 






























MODULE CREATION : 
ERASE 


à 12,10 SAY ‘’ Pour cela, nous créons les fichiers VIDES 
à 13,10 SAY ‘’ nommés FAITS et REGLES" 

à 14,10 SAY ‘’ Nous nous servirons des commandes 

du menu pour gérer ces bases‘ 

à 15,10 SAY ‘’ CONCLUSIONSs, CONDITIONS et FAITS 


mesurent tous 30 Caractères'’ 


WAIT 

ERASE 

g" LISTE DES FICHIERS PRESENTS 
SUR LE DISQUE ACTIF" 

LIST FILES 


à 20,10 SAY ‘’Créer un fichier déjà existant l'efface‘’ 
à 21,10 SAY ‘Confirmez si l'on continue O/N'' 
WAIT TO TEST 

IF (TEST) <> ‘'O'' 


RETURN 
ENDIF 

DO CREAT__F 
DO CREAT_R 
RETURN 


Et voici les explications sur le 


fonctionnement du système-expert. 


Parmi tous les modules de ce programme, les 
plus importants sont bien sûr CHERCHE, 
RECHERCHE et COMPARAISON. Ils sont ce 
que l’on nomme en Intelligence Artificielle le 
moteur d’inférences, c’est-à-dire la partie du 
programme mettant en relation les faits et les 
règles et qui trouve éventuellement les solutions. 
Les autres modules étant plus classiquement des 
programmes de gestion des fichiers FAITS et 
REGLES (ajout, effacement, etc, que le lecteur 
connait bien maintenant), avec une petite 
exception pour le programme INVER__R, qui sert 
simplement à permuter des règles dans REGLES. 


Quels sont les principes de fonctionnement d’un 
tel programme ? 


Pour comprendre, nous allons prendre un 
exemple simple et le faire fonctionner. 


Soit la base de faits suivante: 
Faits : B, D, EF, G. 
Et la base de règles suivante : 


Règles : 

n°1:EsiFet G. 
n°2:CsiDetE. 
n°3:ASiB et C. 


L'analyse par saturation que va en faire le 
système-expert consistera à chercher si chaque 
règle peut être résolue en comparant ses 
conditions aux faits de la base de faits. On sait 
que, si tel est le cas, la conclusion de la règle 
devient à son tour un fait, lequel est ajouté 
momentanément (le temps de l'analyse), à la 
base de faits. On sait également que, pour ne 
pas analyser plusieurs fois une règle déjà 
résolue, on conviendra de mettre un indicateur 
inhibant (momentanément également) la ‘règle en 
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à 10,10 SAY ‘’ ***CREATION DE LA BASE DE CONNAISSANCES * ** 


à 17,10 SAY ‘’ENTREZ UNE TOUCHE QUELCONQUE POUR CONTINUER" 


PROGRAMMATION DBASE II 


question. Par ailleurs, on se doute qu’une fois la 
liste des règles analysée, des faits nouveaux ont 
pu être ajoutés dans la base de faits; ce qui 
signifie qu'il faut de nouveau réanalyser la base 
de règles jusqu'à ne plus trouver de faits à 
ajouter, auquel cas la recherche est terminée: on 
parle alors de saturation. Il convient alors 
d'afficher la liste des faits ajoutés, Puis d'effacer 
ces derniers de la base de faits pour remettre 
celle-ci dans son état initial. De plus, certaines 
règles ayant été marquées inhibées, il convient 
également de rendre celles-ci opérationnelles de 
nouveau. 



















































Reprenons notre exemple et lançons l'analyse. 
Dans le module CHERCHE, le programme va au 
préalable chercher le nombre de faits dans la 
base de faits et stocke ce nombre dans 
DERNIER, d'où les lignes : 


SELECT PRIMARY 
USE FAITS 

GO BOTTOM (déplace le pointeur sur le dernier 
enregistrement) 

STORE # TO DERNIER {stocke le numéro actuel, #, 
dans la variable DERNIER) 

Donc, ici, DERNIER = 4. 


Puis le programme stocke 1 dans la variable 
TEST. Cette dernière sert simplement à relire 
inlassablement la base de règles : si une règle est 
validée, on met 1 dans TEST, sinon O0. Cela fait 
que, tant que TEST est égal à 1, le programme 
réanalysera la base de règles ; dans le cas 
contraire, il sera donc à saturation. On peut 
noter les lignes : 





un 
nr 
| 






STORE 1 TO TEST 
DO WHILE TEST = 1 
STORE 0 TO TEST 


qui peuvent sembler curieuses, surtout la 
première et la troisième. En fait, cela se 
comprend si l’on veut lancer le programme et le 
faire fonctionner tant que TEST = 1. II faut 
donc au départ initialiser TEST égal à 1. Puis, 
dès que la boucle est validée, remettre 
TEST à 0, puisque c’est la valeur de fin de 
recherche. Dans la suite du programme, on 
verra que si une règle est validée, TEST sera de 
nouveau égal à 1. Dans le cas où il n’y aura 
pas de règles validées, TEST sera donc égal à O 
(puisque définie ainsi dans cette troisième ligne). 


Ainsi, TEST vaut O pour l'instant et le 
programme appelle le module RECHERCHE. 
Faisons comme lui, et branchons-nous sur ce 
dernier. 


Que fait-il ? Simplement, le programme va 
extraire les règles les unes après les autres, et, 
au sein de chaque règle, extraire chaque 
condition pour les comparer aux faits de la base 
de faits. On remarque les deux lignes : 






STORE ‘'N'' TO COMP 
IF VALIDATION = ‘’ ‘ 
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La première sert à initialiser la variable COMP 
égale à ‘‘N‘° ; nous verrons pourquoi ensuite. La 
seconde teste la valeur de VALIDATION, qui 
est le premier champ d’une règle. En effet, ce 
champ sert à inhiber la règle si elle a déjà été 
résolue. Si ce champ contient autre chose que le 
champ vide ‘* ‘‘, soit en réalité la lettre ‘‘V", 
cela signifie que la règle est invalidée. Ainsi, si 
VALIDATION est vide, on peut analyser les 
conditions de la règle en question. Pour 
l'instant, aucune de nos règles n'est invalidée, et 
donc chaque champ VALIDATION est vide. On 
peut donc analyser tout le fichier (DO WHILE 
.NOT. EOF) REGLES : 


n°1:EsiFet G. 
n°2:CsiDet E. 
n°3:ASiB et cC. 


Analysons la première selon la ligne 


STORE CONDITIONT TO CLAUSE 


DO COMPARAISON 





Ces lignes permettent de stocker la première 
condition de la règle courante dans une variable 
CLAUSE, puis de se brancher sur le module 
COMPARAISON. Pourquoi stocker CONDITION 1 
dans CLAUSE ? Tout bonnement parce qu'il faut faire 
l'opération quatre fois, c’est-à-dire faire la 
comparaison CONDITION <—> FAIT quatre fois 
(Quatre pour le nombre maximum de conditions dans 
une règle) ; or, il est plus simple de créer un 
programme COMPARAISON utilisant une même 
variable, CLAUSE, et de l'utiliser QUATRE fois, 
plutôt que d'écrire quatre programmes de 
comparaison utilisés chacun UNE fois. Dans d’autres 
langages, nous aurions dit que nous faisions un 
passage de paramètre, dans lequel CONDITION 1, ou 
CONDITION 2 etc. seraient des variables réelles et 
CLAUSE une variable formelle. 


Pour revenir à notre exemple, la règle analysée est la 
première, E si F et G, et CONDITION 1 est donc F. 
CLAUSE vaut maintenant F, et le programme se 

branche sur le module COMPARAISON : nous aussi ! 


Ce module va donc servir à vérifier si le contenu de 
CLAUSE se trouve dans la base de faits. Si oui, on 
stocke ‘‘O”’ dans COMP ; sinon, COMP vaut toujours 
‘N°’, comme on l’a vu précédemment. À quoi peut 
bien servir COMP ? En fait, il faut bien un test 
montrant que si une condition donnée de la règle en 
cours d'analyse est validée, il faut continuer la 
recherche sur cette règle, sinon on passe à la règle 
suivante. C'est la valeur de COMP qui va servir de 
test. Dans notre exemple, comme F est dans la base 
de faits, COMP vaut donc ‘‘O”’. Et maintenant on 
revient dans le module RECHERCHE, à la suite de 
l'appel de COMPARAISON : souvenez-Vous : 













STORE ‘’N'° TO COMP 

STORE CONDITION] TO CLAUSE 

DO COMPARAISON 

IF COMP = ‘O' 

STORE CONDITION2 TO CLAUSE etc. 
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Comme il se trouve que COMP vaut ‘‘O*', on 
peut passer à l'analyse de la condition suivante, 
laquelle est CONDITION 2, dans l'exemple de 
la règle analysée la valeur G. CLAUSE vaut donc 
‘G‘* et de nouveau le programme se branche 
sur le module COMPARAISON. ‘‘G‘‘ est dans la 
base de faits, ce qui laisse COMP égale à ‘‘0‘‘ et 
le programme revient à la suite de l'appel de 
COMPARAISON dans RECHERCHE. De 
nouveau, nous trouvons des lignes presque 
identiques : 


IF COMP = ‘’O” 


STORE CONDITION3 TO CLAUSE etc. 





Pour permettre d'analyser la troisième condition 
de la première règle. Comme elle est vide, 
CLAUSE sera donc vide; l'appel de 
COMPARAISON va donc aboutir au test fait en 
premier dans ce module, lequel dit : 


IF CLAUSE = ‘ 
STORE ‘'O'' TO COMP 
RETURN 


et signifie que, si CLAUSE est vide, la 
comparaison est bonne, et l'on passe à la clause 
suivante ; laquelle est vide également. 
L'ensemble ici sert à obliger le système à 
analyser les quatre conditions de la règle, mème 
S'il y en a de vides, simplement pour permettre 
d'aboutir aux lignes de RECHERCHE suivantes : 


8’ J'ajoute’ + CONCLUSION + ‘’ dans la 
base de faits’’ 

RELEASE CLAUSE 

& chr(7) 

SELECT PRIMARY 

USE FAITS INDEX INDFAIT 

REINDEX 

& ‘Voici la liste des faits existants’’ 
APPEND BLANK 

REPLACE FAIT WITH CONCLUSION 

& ‘’A laquelle j’ajoute’’ , FAIT 

LIST 

INDEX ON FAIT TO INDFAIT 

STORE 1 TO TEST 

SELECT SECONDARY 

REPLACE VALIDATION WITH ‘’V' 

8 ‘’ La règle est (provisoirement) invalidée’’ 


ENDIF 


Tout ceci signifie que la CONCLUSION de la 
règle est ajoutée dans la base de faits et indexée 
(le lecteur aura remarqué que pour améliorer la 
recherche, cette dernière se fait sur un fichier 
indexé). 

Comme prévu, on stocke 1 dans TEST, ce qui 
indiquera au système qu'il faudra refaire le 
moment venu une analyse de la base de règles, 
Car il y a au moins un fait nouveau ajouté dans 
cette dernière. 

Comme prévu également, on invalide 
provisoirement la règle en stockant ‘‘V*‘‘ dans 
VALIDATION. Puis le module RECHERCHE 
continue ses investigations sur la règle suivante. 














Comme tout ceci peut sembler complexe, voici 
une session à partir de notre exemple : 


Base de faits : B, D, F, G. 


Analyse de règle n°1:EsiF, G. 
F et G sont dans FAITS, donc: 
E est ajoutée dans FAITS, 
TEST = 1, 
règle n° 1 invalidée. 


Base de faits : B, D, F, G, E. 
Analyse de règle n°2 : C si D, E. 
D et E sont dans FAITS, donc : 
C est ajouté dans FAITS, 
TEST = 1, 
règle n° 2 invalidée. 


Base de faits: B, D, F, G, E, C. 
Analyse de règle n°3 : A si B, C. 
B et C sont dans FAITS, donc : 
A est ajoutée dans FAITS, 

TEST = 1, 

règle n° 3 invalidée. 


Comme TEST = 1, on refait une analyse 
(module CHERCHE), et l'on remet TEST à O: 
Base de faits : B, D, F, G, E, C, A. 


Analyse de règle n°1 
Règle invalidée. 
TEST = 0 











Base de faits: B, D, F, G, E, C, A. 


Analyse de règle n°2 
Règle invalidée. 
TEST = 0 


Base de faits: B, D, F, G, E, C, A. 


Analyse de règle n°3 
Règle invalidée. 
TEST = O0 


Comme TEST = 0, la saturation est atteinte: il 
n'y a plus de faits déductibles. On peut donc 
revenir à la suite du module CHERCHE, aux 
lignes suivant DO RECHERCHE, où l'on remet 
à vide tous les champs VALIDATION des règles. 
et où, après avoir affichés les faits initiaux et 
déduits, l'on efface de la base de FAITS ces 
derniers. 


C'est tout pour aujourd'hui. Nous verrons dans 
une troisième et dernière partie des explications 
sur les autres modules du programme et une 
session commentée. D'ores et déjà, le lecteur 
intéressé peut créer sa propre base de données 
et l'analyser avec ce système-expert. On peut 
très facilement lui adjoindre (au système, pas au 
lecteur) des coefficients de vraisemblance, le 
modifier Comme on voudra. Nous ne pouvons 
qu'inciter tout lecteur à le faire, et en tout cas, à 
faire part de ses opinions dans ma boîte au lettre 
du serveur de l'Echo, boîte nommée comme 


moi-même, c'est-à-dire Patrice Bihan ! 
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Les fichiers commandes 
de cet article 
se trouvent sur la 
disquette ECHO N°13 

















LL 
GEAVICE ENTREPRISES 2. 


Au service de ses lecteurs, L'Echo du PCW met ses compétences, son savoir-faire 
et son important fichier de fournisseurs au service des entreprises de toutes tailles. 


Les prestations de ce service sont regroupées 
dans un catalogue spécial qui sera adressé à toute demande 
libellée sur papier à en-tête mentionnant les numéro de SIRET 
et d'APE (ou titre pour les professions libérales). 


Entièrement gratuit, ce nouveau catalogue ‘‘entreprise‘‘ est remis à jour et envoyé 
régulièrement à toute entreprise ou profession libérale qui en fait la demande. 


SOYEZ PRODUCTIF ! 






- PC/PCW la compatibilité est possible avec le service 
entreprise avec un nouveau service de transfert de fichiers 
soit : recopie de fichiers CP/M vers MS/DOS 

ou l’inverse (MS/DOS vers CP/M). 


- Ce qui sort de votre entreprise est à son image alors soignez-la avec : 
Papier à en-tête personnalisée en continu 
Facture à en-tête personnalisée en continu 
et tout type de formulaires personnalisés en continu. 


GAGNEZ DU TEMPS... | | | | | 
- Le service entreprise, c’est aussi une liste de prestataires 


compétents pour résoudre vos problèmes quotidiens comme : 
Programmes sur mesure (tous langages) 
Connexions difficiles 


Maintenance et formation 
ET DE L'ARGENT ! 


& 


N'attendez pas pour inscrire votre entreprise en retournant ce jour le bon ci-dessous à : 
LOGTSTICK - CAPN LE BONAPARTE - BOITE 49 - 93153 LE BLANC MESNIL CEDEX 


2 ee 


STE : FORME JURIDIQUE* : CAPITAL* : 


- De nombreux revendeurs accordent des remises aux entreprises, 
collectivités et professions libérales. Le service entreprise vous en 
donne la liste actualisée. 















ADRESSE COMPLETE : 











NOM ET PRENOM DU RESPONSABLE ACHAT INFORMATIQUE : MR° - MME° - MELLE” : 


ACTIVITE PRINCIPALE : 





NOMBRE DE PCW EN SERVICE DANS L'ENTREPRISE : 


* FACULTATIF - ° RAYEZ LA MENTION INUTILE 


LANCEZ 













MATERIEL 


PCW VOULANT SE PRENDRE POUR UN 


MAC CHERCHE S O U RIS DOCILE.... 


Par A. FRIEDRICH 





KEMPSTON L'HISTOIRE 


Firme anglaise par excellence, KEMPSTON DATA est 
devenu synonyme d'extension de qualité sur de 
nombreuses machines et plus particulièrement sur 
SPECTRUM (SINCLAIR). La philosophie de 
KEMPSTON 1 largement contribué à bâtir sa 
réputation. Qualité et robustesse, sans fioritures 
inutiles, pour garantir des prix abordables. 
Aujourd’hui KEMPSTON propose deux extensions 
majeures pour le PCW. La première, une extension 
joystick, déjà décrite dans l’Echo N° 9, n'eut pas le 
succès qu’elle pouvait espérer. Sortie trop 
tardivement, les éditeurs ne purent lui adapter leurs 
jeux. Seuls les jeux sortis (HEAD OVER HEELS 
d’OCEAN) après ou ré-adaptés (FAIRLIGHT version 
2 de THE HEDGE) permirent de combler 
partiellement un retard qui, semble-t-il lui fut tout de 
même fatal. Pour preuve, signalons qu’elle est 
aujourd’hui pratiquement introuvable en France. 


La seconde extension qui fait l’objet de notre essai, 
eut plus de chance. Sortie après l'interface joystick, 
elle fit une apparition suffisamment précoce sur le 
marché anglais pour pouvoir espérer se positionner 
comme challenger de celle d'ELECTRIC STUDIO 
(décrite dans l’Echo N° 3 - cf Du hard qui mousse). 
L'idée première était de supprimer toutes fioritures 
pour atteindre un prix très inférieur, lequel devait, 
selon la logique, en faire une référence qui obligerait 
chaque éditeur à tenir compte de son existence dans 
là conception de leurs nouveaux logiciels. Pari facile à 
tenir puisque nombre d’entre eux le firent sans hésiter 
comme nous le verrons plus loin. 


PRESENTATION D'ENSEMBLE 


Livrée dans un boîtier en polystyrène expansé qui la 
garantit contre toutes les affres des déplacements, 
elle se décompose en trois parties : 


Après des mois de solitude, Maître PCW cherchait à 
se caser... Publication assistée, dessins stylés et 
déplacements alambiqués usaient de leurs pouvoirs 
pour lui faire voir la vie. Il lui fallait une souris, une vraie 
de vraie comme il pouvait en mériter une. Ni trop 
ruineuse, ni trop gourde, une souris souris en somme... 
Exaucé dans ses désirs secrets, il allait être servi de 
noble manière par un vieux renard des mariages 
hardwares dont l'expérience n'est plus à démontrer : 
KEMPSTON. 


1 - L'INTERFACE : 


En premier, l'interface, sous forme d’un boîtier 
compact et d'aspect robuste, vient se fixer sur le port 
d'extension du PCW. Seul regret et non des 
moindres, le boîtier ne propose aucune sortie 
permettant l’adjonction d’une autre extension qui, 
comme elle, n'aurait pas de broches supplémentaires 
(le CPS 8256 par exemple). Par contre, une broche 
solidement fixée et repérée par un détrompeur 
solidaire offre un raccordement précis et très résistant 
aux tiraillements du fil de la souris qui constitue la 
partie suivante du pack... 


2 - LA SOURIS : 


En second, donc, la souris elle-même, se raccorde à 
l'interface par l'intermédiaire d’une 

prise moulée qui paraît pouvoir résister fermement 
à l'usure qu’un usage régulier provoque assez souvent 
sur ce type de raccordement. La connexion est 
assurée par une prise CANNON à 9 broches ce qui est 
une très bonne chose quand on sait que cette prise 
est un standard très prisé qui tend à se répandre et 
promet ainsi un futur plus brillant qu’un placard à 
cette charmante extension. 


Pour revenir dans des détails typiquement 
anatomiques, signalons que la longueur du cable qui 
la relie au PCW est proche des deux mètres ce qui est 
largement suffisant et mérite une mention spéciale 
quand on a déjà goûté aux câbles nains de certaines 
avares qui obligent l'utilisateur à des contorsions 
lombaires indignes du sérieux qui le caractérise. 


Pour continuer dans l’étalage de ses formes les plus 
marquantes (restons tout de même dans le sujet !!! 
NDLR), nous constatons qu'il est plutôt ramassé. D'un 
ambre de bon goût, il se nettoye très facilement et le 
fait qu'il soit lisse empêche l’inscrustation des dépots 
salissants que la manipulation entraîne généralement. 
Autre avantage, la disposition des touches et la forme 
d'ensemble empêchent que la main qui l'utilise soit 
collée contre elle, évitant par là, les échauffements 
que le contact provoque avec la transpiration. En fin 
de compte, la préhension se fait du bout des doigts et 
c'est nettement préférable pour la précision et la 
rapidité. 
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Le déplacement sur un support est transmis à trois 
potentiomètres internes par une boule de silicone 
d’une exceptionnelle adhérence qui rappelle celle 
d'ELECTRIC STUDIO. Les déplacements sont donc 
parfaitement transmis sur surfaces très lisses ou pas 
du tout. Cette particularité est un point majeur de 
cette souris car nombreuses sont ses cousines qui 
exigent tapis rugueux ou tramés (souris optique pas 
encore sur PCW pour daigner se laisser entraîner. 
C'est assurément un souci de moins et une économie 
de plus (les tapis spéciaux sont rarement offerts). 


Pour en terminer avec la boule de traction, félicitons 
KEMPSTON d’avoir choisi de la maintenir par un 
cache circulaire qui s’enlève en un tour de main et 
sans outil (c’est la seule à ce jour qui le permet). 
Cette particularité n'est pas aussi insignifiante qu'elle 
le paraît. En effet, roulant sans cesse sur des surfaces 
aussi diverses qu’accidentées par les émanations f 
perfides du sandwich qui sert d’emblème aux 
mordus d’informatique, la boule emporte dans son 
élan ce qui peut traîner dans son sillage et... ça 
s’encrasse et un nettoyage express est toujours bienvenu. 


En somme, elle semble résolument conçue pour 
garantir une propreté totale qui, alliée à la robustesse 
des différents éléments (boîtier, souris et fils), sont les 
gages d’une longivité absolue. 


Enfin, deux boutons servent à tout autre contact que 
le simple déplacement (on dit le cliquage.. Cliquons 
mes frères !). 


C'est très souvent suffisant mais comme nous le 
verrons plus loin, certains programmes en auraient 
mérités trois. Pour être plus positif, remarquons que 
particulièrement bien séparées l’un de l’autre, les 
deux boutons de la souris KEMPSTON ne laissent 
aucune chance aux erreurs de pression que des 
boutons trop rapprochés provoquent. Cet avantage 
est d’autant plus évident et l’utilisateur final n’est pas 
forcément très qualifié. 


3 - LA DISQUETTE : 


La troisième composante de notre pack n’est pas la 
moindre puisqu'il s’agit de la disquette qui contient 
quelques programmes indispensables qui nous 
permettent d'aborder maintenant l'aspect logiciel du 
raccordement de la souris. 


Pour clarifier la situation notons d’un fois raccordée, 

la souris fonctionne suivant deux modes : 

- Le programme utilisé prévoit le raccordement de la 
souris KEMPSTON (ex : DT__PAO). 

- Le programme ne connaît pas la souris mais 
fonctionne sous CP/M (ex : MULTIPLAN). 


PROGRAMMES RECONNAISSANT 
LA SOURIS KEMPSTON : 


Particulièrement de type graphique, la liste des 
programmes sachant reconnaître la présence de la 
souris KEMPSTON ne fait qu’augmenter. Déjà, les 
musts de la P.A.O. l’intègrent dans leurs options. 


Madame est déjà 
connue sous 
DTP-PAO... 
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Dans le cas de D.T.-PAO, un menu d'option obtenu 
n'importe quand par la touche [PASTE] offre un 
choix varié (voir figufe 1). Une fois mise en circuit, 
la souris se substitue totalement au clavier pour tout 
ce qui concerne les déplacements, les choix, les 
validations et le dessin. Dans le cas de DT-PAO, seuls 
les textes devront être frappés au clavier car tout le 
reste des options s'obtient avec la souris. C’est plus 
rapide et plus agréable, d'autant plus que DT-PAO 
semble avoir été créé dans l’optique d’une utilisation 
avec souris. Nous sommes d'autant plus certains si 
l’on considère l’option DIMENSION TAPIS obtenue 
encore avec la touche [PASTE] et qui permet de 
régler la sensibilité du déplacement de la souris (de A 
rapide à G lent, voir figure 2 et plus loin, KMOUSE 
NOW sous CP/M). 








CHATRICES Mt CN) 
Figure 2 


Une option qui aurait 
plu à Bernard et qui 
règle la sensibilité de 
la souris sous 
DTP-PAO. 


En mode graphique, la souris apporte un aisance dans 
les dessins et des déplacements car toutes les 
directions sont valides (figure 4). Le bât blesse 
lorsqu'il s’agit d’être aussi précis dans les 
positionnements et, ce, d'autant plus que DT-PAO 
n'offre aucun repère orthonormé (positions du 
curseur dans le plan par les coordonnées X et Y). 
Cette lacune du programme désavantage la souris au 
profit du clavier dans l'optique de réaliser un dessin 
technique précis. D’autres programmes sont aussi 
compatibles avec la souris KEMPSTON, citons FLEET 
STREET EDITOR PLUS de MIRROR SOFT 
(publication assistée), MICRODRAFT de TIMATIC ou 
DRAUGHTMAN de EG COMPUTER GRAPHICS 
(dessin assisté), WRITE HAND MAN de HISOFT 
(aide bureautique genre COMPAGNON. Pour être 
franc, nous n’avons pas encore testé ces précédents 
logiciels en compagnie de la souris et nous nous 
abstiendrons, provisoirement, de tout commentaire. 


Enfin, signalons qu'un intégrateur du type GEM 
(DIGITAL RESEARCH) ou WINDOWS 
(MICROSOFT) est en développement et sa sortie est 
imminente. Présenté en avant première au PCW 
SHOW de Londres, il permet de gérer fichiers et 
programmes avec une déroutante facilité à laquelle 
nous espérons vous faire goûter rapidement. 





Pour aller de A vers B avec le 
clavier, il faut utiliser une 
succession de — et de +}. 


Avec la souris, on y va 
rapidement et l'interface 
reconstitue la succession de 
touches qu'il aurait fallu 
presser pour y aller le plus 


Figure 3 directement. 
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Sortant du cadre des programmes conçus pour 
reconnaitre la souris, nous ne sommes pas 
abandonnés par KEMPSTON qui propose plusieurs 
utilitaires qui justifient la présence de notre troisième 
constituant : la disquette. 

Le premier programme KTEST sert à tester que la 
souris est parfaitement raccordée et que toutes les 
directions ainsi que les deux boutons sont 
opérationnels. Si ce programme n'est pas d’un usage 
courant, il a l'avantage de permettre une rapide 
vérification si le programme susceptible d'accepter la 
souris ne le faisait pas convenablement. Nous 
pourrions alors identifier le responsable comme étant 
le programme, la souris ou le paramétrage de cette 
dernière. Ceci nous conduit inéluctablement vers 
l'utilitaire suivant … 


KMOUSE.COM 


Ce programme miracle sert à tout ce qui concerne 
l'utilisation de la souris sous CP/M et l’adaptation de 
celle-ci aux différents programmes que chacun a 
l'habitude d'utiliser. 

Lancé sans précision particulière, KMOUSE affecte 
aux quatre directions de déplacement les valeurs des 
touches de curseur afin que le mouvement de la 
souris soit interprété comme une pression sur les 
touches pointant dans les mêmes directions. 
KMOUSE affecte les touches (ALT) + (C) au bouton 
gauche et (ALT) + (R) au bouton droit. Pour 
commenter ce choix, nous dirons que (ALT) + (M) 
aurait été plus judicieux puisqu'il correspond à la 
touche (RETURN). 


L* 
he Avec KMOUSE 
jt 

clavier 
même plus. 





Figure 4 


KMOUSE NOW 


Les quatre directions sont donc les valeurs par défaut 
qu'affecte KMOUSE à la souris mais dans bien des 
cas, d’autres touches sont préférables. Sous 
WORDSTAR nous préférerions (ALT) + (LE), 

(ALT) + (D) et (ALT) + (X) pour les déplacements. De 
la même façon que nous aimerions pour MULTIPLAN 
affecter respectivement (TAB) et (RETURN) aux 
boutons gauche et droit ou ralentir la vitesse de 
perception du déplacement pour que le curseur ne 
parte pas dans tous les sens au moindre mouvement 
de la souris (profitons de l'endroit pour signaler que 
dans le cas de MULTIPLAN, un troisième bouton 
n'aurait pas été de trop pour la touche (STOP). Tous 
ces problèmes sont gérés et, consolons-nous, résolus 
par KMOUSE qui, suivi par le message NOW offre la 
redéfinition des directions, des boutons et de la 
vitesse de perception (de 2 rapide à 9 lent, pour 
MULTIPLAN une valeur comprise entre 5 et 8 est 
idéale). Les touches par défaut appelées par KMOUSE 
peuvent aussi faire l’objet d’une sauvegarde par 
KMOUSE DISC et pourront ainsi être incluses dans 
un fichier de lancement automatique PROFILE.SUB. 


KMOUSE OFF 

Cette option termine le chapitre KMOUSE puisqu'elle 
permet tout simplement de désactiver la RSX et 
récupérer ainsi la place qu’elle occupait. 


SOURIS ET GSX 

Dans le cas d’un interfaçage de la souris avec un 
programme utilisant GSX (Basic, DR DRAW, DR 
GRAPH) la disquette prévoit un driver appelé 
DDKMOUSE.PRL qui devra être recopié sur la face 
système GSX où se trouve le fichier ASSIGN.SYS qui 
doit être modifié pour la circonstance. Cela se fait 
sous éditeur (RPED par exemple) et nous devons 
remplacer DDSCREEN.PRL par DDKMOUSE.PRL. 


SOURIS ET PROGRAMMATION 


La programmation devant prendre en compte la 
souris peut se faire suivant deux axes. Le plus simple 
consiste à lancer KMOUSE qui étant une RSX, restera 
en mémoire en permanence (occupation mémoire 512 
octets) et sachant qu’il permet d'attribuer une touche 
à chaque direction du mouvement et des boutons, il 
ne restera qu’à tester comme s’il s'agissait de la 
touche elle-même, redéfinie ou non par KMOUSE 
NOW. 


L’alternative consiste à se passer de KMOUSE, donc à 
économiser les octets qu’il consomme en mémoire et 
à tester les trois ports concerné par le raccordement 
de la souris. 









NUMEROS ET AFFECTATIONS DES PORTS CONCERNES PAR LE SOURIS KEMPSTON 
Port 208 (décimal) ou &H DO {hexadécimal) : coordonnées X [horizontal) 

Port 209 {décimal} ou &H D1 (hexadécimal) : coordonnées Y (vertical) 

Port 212 (décimal) ou &H D4 {hexadécimal) : état des boutons 






Le test de ces ports pouvant se faire dans tous les 
langages acceptant de tester et de récupérer la valeur 
numérique renvoyée par ces derniers (INP en basic, 
IN en assembleur, etc...) 


EN CONCLUSION 


Par la solidité de sa conception et les choix des 
matériaux qui la composent, la souris KEMPSTON 
promet de rester très longtemps fidèle au PCW 
capable de lui accorder son coeur. Mieux, la prise 
CANNON qui sert à son raccordement lui permettra 
de convoler sous d’autres cieux sans trop de crainte 
d’être répudiée pour incompatibilité d'humeur. Si le 
package KEMPSTON n'inclut aucun programme 
spécial de dessins comme le propose celui 
d'ELECTRIC STUDIO c’est parce qu’elle joue le jeu 
de la polyvalence et de la compatibilité sur un air de : 
‘‘si je suis pas trop chère, tout le mondre me voudra 
et si tout le monde me veut, tous les éditeurs me 
feront les yeux doux pour que j’emballe leurs 
curseurs...” Il semble que cette politique soit la bonne 
puisque déjà les best sellers anglais sont à ses pieds. 


Côté pratique elle se défend. Un long fil lui permet de 
s’ébattre sans retenue, le contact par la boule de 
silicône est un choix excellent qui assure une 
adhérence quasi parfaite sur toute surface sans 
l'investissement d’un tapis spécial. Seul défaut, 
l’absence d’un troisième bouton qui frustrera les 
inconditionnels de MULTIPLAN mais qui ravira les 
novices dyslexiques rebelles à la complication. 
L'aspect logiciel de son thème natal est normalement 
aspecté. Toujours dans la simplicité, un programme 
facile, KMOUSE, répond à tous les besoins de 
redéfinition, tant au niveau des directions que de la 
sensibilité de perception. 

Pour l’ensemble de ces raisons, la souris KEMPSTON 
est une valeur sûre qu’un prix extrêmement 
raisonnable ne pourra démentir. 
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cours complet de dactylographie 
pour la maîtrise du clavier Azerty 


une méthode unique 
comprenant plus de cent exercices 
progressifs en rythme et en difficulté 


Mettez toutes les chances de votre côté avec AZERTY 
c'est un logiciel LOG/’STICK distribué par D.D.I. 
en vente chez votre revendeur spécialiste PCW 
Renseignements (1) 48.67.28.44 + 


251, bd Raspail, 75014 Paris. M° Raspail. Tél. 43 21 54 45 £ 
50, rue de Richelieu, 75001 Paris. Tél. 42 96 93 95 l espace le plus 


Métro Palais Royal. Du lundi au samedi de 9 h 30 à 19h micro de Paris ! 


LE TOUT PCW > 4 micheleu- 75001 paris 


MATERIEL UTILITAIRES SLA) 


6 E ALIENOR 105500 BATMAN ET 
AMSTRAD PCW 8256 4740.00 : 
AMSTRAD PCW 8512 EE à 175000 BOB WINNER 240.00 


1 2 JOURNEE DE FORMATION fl EXToNoe) 
GRATUITE POUR TOUT ACHAT A 790 00 


1 15000 FRANCK BRUNO BOXING ER) 
BRIDGE PLAYER 220.00 


690 00 TZ No] LR: 107110) 229.00 


PERIPHERIQUES CKET CA 49000  ORPHEE PLERU 


(el: 7 Ve] Mol gre! 490 00 
INTERFACE M S Ÿ 290 00 
EXTENSION 2 1 \ 290 00 
LECTEUR FD2 1 

DIGITALISEUR VIDEO 
EMULATEUR MINIT 


GUARDIAN 170.00 
STRICKE FORCE HARRIER 199.00 
Lo 201121 PER) 
35000 TRIVIAL POURSUIT 290.00 
Eole TOMAHAWK LR) 
990 00 3D CLOCK CHESS 150.00 
co) 


SERVEUR MINITEL.SY L 0 cW 000 BIBLIOGRAPHIE 
MERCITEL PCW° L . Ÿ 1 )__ BIEN DEBUTER AVEC PCW 129.00 
MERCITEL PCW2 0 MA 1 GRAND LIVRE DU PCW 179.00 


ACCESSOIRES 


GESTION SUR PCW 175.00 
MULTIPLAN ENTREPRISE 158.00 


Re aie 2 3 R )_  DBASE Il APPLICATION 158.00 
CLR 0 

DISQUETTES CF s Oo ) LIVRAISON 48 H POSTE EXPRESS 
DISQUETTES CF S 10 LA : PRIX AU Ter JUILLET 1987 

RUBAN IMPRIMA 1e , ) CREDIT - FACILITES DE PAIEMENT 


BON DE COMMANDE à adresser à VIDEOSHOP, Dept VPC - B.P. 105 - 75749 PARIS Cedex 15 
NOM 


PRENOM 
ADRESSE 
VILLE 


Je règle par Désignation des articles demandés 





[ C. Bancaire [ CCP 


DEMANDE DE DOCUMENTATION 





Je possède un micro de type 
Frais de port 


CODE POSTAL Je joins 3 timbres à 2,20 F pour frais d'envoi TOTAL TTC 








NIVEAU : DEBUTANT 


PROGRAMMATION BASIC 


AMBABLANCHE 


Le succès croissant et la correspondance 
volumineuse qui l’assaille régulièrement 
prouve l'intérêt que les lecteurs portent aux 
réalisations d'Olivier COQUIN. Pour répon- 
dre à la majorité d’entre eux, la rédaction 
lui a accordé carte blanche, ce qu'il n’a pas 
hésiter à mettre à profit pour nous 
proposer quelques petites réalisations et 
judicieux conseils. 






















LES LIGNES A AJOUTER 





1082 IF P=4 THEN P=12 
1085 IF P=3 THEN P=4 
1392 FOR 1=1 TO DUR 
1394 INTRTS=INTRTS +LC{1,3) 
1396 TOTAN =TOTAN +LC{1,5) 
1398 NEXT | 


1585 PRINT CLSS;FNPS['Cout total de l'emprunt :”’,1]:PRINT FNCS(30,5) 
“Montant initial + cumul intérets :’:USING USS:M+INTRTS:PRINT 
FNCS(30,7)'Total Annuités cumulées :‘'; USING USS;TOTAN 


1785 LPRINT:LPRINT:LPRINT SPC{45)'’Cout total de l'emprunt :’’;USING US$; 
M+INTRTS:LPRINT 







Vous êtes nombreux à m'avoir fait part de votre 
extrême désappointement lorsque vous vous êtes 
aperçus que le cas d’une périodicité mensuelle 
dans la deuxième partie du programme n'avait 
pas été prévu (tableau d'amortissement 
d'emprunt). 









A la demande générale, nous allons de ce pas 
régler ensemble ce problème. Vous allez voir, 
cela ne sera pas bien difficile. Quelques lignes à 
modifier, d’autres à rajouter, et le tour sera 
joué. 




















LES LIGNES A MODIFIER : ns 
Vous remarquerez que le test qui se trouvait à la 


- Lignes avant modification : fin de la ligne 1080 n’a pas disparu puisqu'on le 
retrouve à la ligne 1085. 
1980 FARREAOl DE PR NRSDERIOS SOLE En fait, les modifications nécessaires pour 
(LS-LEN(PERIOS] + “> L'+CHRS(64+1)+ "7" 15+I}:NEXT accéder à une périodicité mensuelle se limitent 
à ‘ aux lignes 1060 à 1085 ainsi qu'à la ligne 
1070 GOSUB 160:1F KY<65 OR KY>67 THEN 1070 ELSE 2010. 


PARIS Les autres lignes qui ont été rajoutées n'ont rien 
1080 RESTORE 2010:FOR 1=1 TO P:READ PERIOS:NEXT: à voir avec ce 

IF P=3 THEN P=4 problème qui n’en 
2010 DATA ‘’Annuelle’’,"’Semestrielle‘!,!’Trimestrielle’’ est déjà plus un : 
elles vous 
permettront de 


Figure 1 



















TABLEAU 





D'ANORIISSEMENT 


















- Lignes après modifications : Soin atiiehés À 
Les endroits sur lesquels les modifications l'écran et Entrée des données de l'emprunt 
portent sont inscrits en gras : ue le - poutaut du pret (FR) 9 180060 
1060 PRINT FNPS['- Périodicité :"!,14):RESTORE 2010:FOR l'emprunt par TAAEMNRE Te 
1=1 TO 4:READ PERIOS:PRINT FNPS(PERIOS + SPACE addition du - Taux d'interet () 9 12.2 
$(15-LEN(PERIOS)}+'"—> ['’+CHRS(64+1)+'')", montant de - Périodicité : 
15+IJ:NEXT nn et en fmelle 2) 
cumu es intérêts énesirielle - 
: THEN ! inestri - 
1070GOSUB 160:1F KY<é5 OR KY>68 THEN 1070 ELSE à de tot dé rinestrielle se (C) 






P=KY-64 mensualités ou 
1080RESTORE 2010:FOR 1=1 TO P:READ PERIOS:NEXT annuités versées 


2010DATA ‘‘’Annuelle‘’,’Semestrielle‘’,"‘Trimestrielle”, pour contrôle. 
‘’Mensuelle"" Vous pouvez voir 
l'effet de ces 
modifications sur 
le masque de saisie 
représenté 
figure n°1. 






- Choix du node d'anortissenent : 







In fine -) (À 
Annuité constante -) (B 
Aaortiss, constant -) (C 
Autre (à entrer) -) (D 










Soit un nonbre total de 60 périodes 








17 | CARTE BLANCHE + L'ECHO DU PCW N°13 


PROGRAMMATION BASIC 





Les résultats obtenus par ce programme tiennent 
bien évidemment compte du taux d'imposition 
des sociétés (Impôt Société ou IS). Ce taux est la 
plupart du temps égal à 50%. Ainsi, dans le 
programme, le calcul des Cash Flows Nets 
s'effectue selon un taux de 50%. Le problème 
est que ce taux est fixé comme constante par le 
programme et que celui-ci étant actuellement de 
45% et devant prochainement passer à 42, il 
faut donner la possibilité de saisir ce taux (des 
fois qu’il baisserait encore !). 


Voici donc les quelques modifications à apporter 
au programme pour remédier à cet intolérable 
état de fait. 


LES LIGNES A AJOUTER 


675 PRINT FNPS['"Taux d'Imposition Société'’+SPACES(15)+:",16) 
:GOSUB 3290:TIS=NUM/100 


3855 DATA 67,16,4,99.9 





La ligne 675 permet d’incorporer au masque de 
saisie de la figure n°2, la saisie du taux 
d'imposition des sociétés. (Cf figure n°2) 

La ligne 3855, quant à elle, contient les codes 
d'emplacement de la saisie sur l’écran et les 
codes de contrôle de saisie des valeurs possibles 
pour le taux. 


CHOIX D'INVESTISSEMENT à L'Echo du PCH - 1387 
#et SAISIE DES CARACTERZSTIQUES DE L'INVESTISSEMENT #64 


Montant de l'investissenent (hors bfdr) : 100,000 .00 
Besoins en fonds de roulenent (bfdr) : 120.00 
Durée totale (nonbre d'années) ! 13.00 
Taux d'actualisation ; 12.00 
Taux d'Inposition Sociôté ‘1 





€ RETURN ) pour valider € eDEL ) pour corriger 


Figure 2 





LES LIGNES A MODIFIER 


680 IF N=0 OR T=0 OR TIS=0 THEN PRINT FNPS{'DONNEES 
ABERRANTES 111/*,17);BEEPS;FNPS(M1$+M2$,20):GOSUB 3720: 
RETURN 


valeur 0.05 (qui en fait était le résultat du 
produit 0.1 par 0.5), par la formule 0.1 x TIS. 


N'oublions pas de penser à la sauvegarde des 
données pour une analyse ultérieure ! Il faut 
donc sauvegarder la valeur de TIS dans le 
fichier. Ainsi les lignes 2740 et 2960 
deviennent : 


2740 WRITE #1,MON,BFDR,N,T,VR,TIS 


et 
2960 INPUT #1,MON,BFDR,N,T,VR,TIS 





Je pense qu'avec ces petites modifications les 
lecteurs qui se sentaient frustrés par leur absence 
auront trouvé enfin leur bonheur. Qu'ils me 
pardonnent toutefois car ils seront obligés de 
resaisir entièrement les données qu'ils auraient 
pu sauvegarder. En effet, puisque l’on modifie la 
structure de sauvegarde et de rappel du fichier, 
on ne pourra plus rappeler un fichier sauvegardé 
avant les modifications sauf par une petite 
astuce que je vous indique tout de suite. 


Il suffit : 
1. d'insérer en plus la ligne : 215 TIS = 0.45 


2. de ne modifier dans un premier temps que 
le module de sauvegarde (ligne 2740) 


3. de lancer le programme après avoir fait 
toutes les autres modifications indiquées 
plus haut 


4. d'appeler le fichier intéressé par SAISIE 
SUR DISQUE 


5. de refaire tous les calculs éventuellement 


6. de sauvegarder le fichier sous le même nom 
ou non 


7. de sortir du programme 
8. d'effacer la ligne 215 


9. de modifier le module d'appel de fichier 
(ligne 2960) 
10. de ne pas oublier de sauvegarder le 
programme 


Voilà ! Je ne m'inquiète pas, je sais que vous 
vous en tirerez à merveille. Bon courage tout de 
même. 





Il faut rajouter le test de vraisemblance pour TIS 
qui contiendra le taux saisi. 


1210 CALC[I,5)=(CALC(I,4)-CALCII,3)}*TIS 
1730 CALC(I,7)=CALC[1,6) + (0.1#TIS* CALC(I, 1)) 


1740 CALCII,8)=CALC(L6)-(0.1#TIS*CALCII,1}} 
1750 CALC(I,9)=CALC[L6)-(0.1 *TIS+ CALC[,2)} 
1760 CALCII, 10} =CALC(L,6] + (0.1 #TIS * CALC(I,2)) 





Ces cinq dernières lignes servent au calcul des 
Cash Flows nets et à l’évaluation du test de 
sensibilité du projet par variations des charges et 
des recettes de + 10% et - 10%. Dans les 
lignes 1730 à 1760, on a donc remplacé la 


CARTE BLANCHE + L'ECHO DU PCW N°13 


Ce mois-ci décidemment, je fais dans la 
simplicité. En effet, le programme que je vous 
propose est très modeste dans sa finalité (Cf 
figure n°3). Quoi de plus banal que d’afficher 
un simple calendrier. Mais quoi de plus utile que 
d’avoir accès rapidement à une date précise ? 
Savoir si le 23 du mois suivant tombe un lundi 
ou un mardi. 


Voyons un peu le fonctionnement du 
programme. Comme on pourrait s’en douter, il 
est des plus simples. Il suffit de rentrer les deux 
derniers chiffres de l’année qui nous intéresse 
(ex : pour 1989, on saisira 89), pour voir 
s'afficher un tableau similaire à celui de la figure 
3 qui en l’occurence est celui de l’année 1987. 
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Mar: 
Mer: 
Jeu: 
Ven: 


$ 
7 
À 


ê 
è 
È 
À 
31 


A partir de là, le programme attend que vous 
tapiez sur une touche pour vous demander si 
vous voulez le calendrier d’une autre année. 
Ceci vous laisse la possibilité de faire un hard 
copy ou copie d’écran à l’imprimante par 


l’appui simultané des touches [EXTRA] + [PTR] 


pour disposer d’un magnifique calendrier de 
l’année en question sur papier. 


Pour ceux d’entre vous qui s'intéressent à la 
programmation, il est à remarquer que plusieurs 
techniques d'affichage de données à l’écran sont 
utilisées. Il y a combinaison de chaînes de 
caractères, de données contenues dans des 
DATA, ainsi que des données numériques 
affichées en format USING pour respecter le 
colonnage des dates. Tout cela étant orchestré 
par des boucles FOR TO NEXT allant jusqu’à 
trois niveaux d’imbrication. 

Ce que vous ne manquerez pas d’apprécier, j'en 
suis sûr, c’est que le calendrier de l’année 
entière est affiché sur une seule page écran. 

Sur ce, je vous souhaite bon courage pour la 
frappe du listing qui ce mois ci n’est pas très 
long. Alors. un petit effort ! 
































Figure 3 


ones 
CL LIST ICT C 





10 CHÉREERSRERNEEEREECREEE EEE" (76) 


20 ‘à 3! (65) 
30 ‘+ CALENDPCW 4" (OF) 
40 ‘à 3" (67) 
50 ‘à PAR OLIVIER COQUIN x" (40) 
60 ‘à {c) LOGI'STICK 87 3" (X6) 
70 ‘à 4! (64) 


80 'ÉREERREELEEEEREEEREEEEEREEEREEEEEST (TN) 

90 CDS=CHRS(27):CLS$=CD$+"E"+CD8+"H"" (HI) 

100 CNS=CD$+"e":CF$=CDS+"F":LFS=CDS+"K"" (KO) 

110 DEF FNCSCC,L)=CD$+"Y"+CHRS(32+L)+CHRS(32+C)' (XD) 
120 DEF FNP$(X$,LG)=FNC#CC90-LENCKX#))/2,L6)+K$" (V1) 
130 WIDTH 90' CHP) 

140 6070 160' (H1) 

150 IS=INKEYS:IF I$="* THEN 150 ELSE I$=UPPERS(IS):AI=ASC( IS); 
RETURN! (OX) 

160 DIM MC12),LI6(3)' (SE) 

170 FOR I=1 TO 12:READ MCI):NEXT' (DE) 

180 LIG(1)=0;LIG(2)=10;LIG(3)=20" (CK) 

190 T$=STRING#(90,"-")" CWX) 

200 PRINT CLS$' (MD} 

210 PRINT FNC$(34,2) "CALENDRIER" (HL) 

220 PRINT FNC$(39,4):"PE RPETUE L*' (GU) 

230 PRINT FNC$(32,6): "REERESEXEREESEEENTEEEEEEEE"T (RS) 















210 PRINT FNCS(3,12):CNS"DE QUELLE ANNEE VOULEZ-VOUS LE CALEND 
RIER ":LFS: : INPUT ANS (VS) 

280 AN=VALCANS)' (NH) 

290 IF * "#ANSC)STRSCAN) OR AN>99 THEN 270! (NV) 

300 J=0:B=0:PRINT CFS' (K3) 

810 M=CAN#365)+INTCLAN-1)/4)' CSA) 

320 IF AN=0 THEN M=0' (SP) 

330 Y=M-C7HINTCM/7))41! (NZ) 

340 IF INTCAM/4)=AN/4 AND ANC)O THEN B=1' CNY) 
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AGO Mme " (N2) 
360 ‘ EDITION CALENDRIER (45) 
DO Mmes ess nn ee " (M) 


380 PRINT CLSS:PRINT FNPSC"C AL E ND R I E R'aSPACES(4)+"D E 
2SPACES(4)#"L ! A NN E E"#SPACES(A)4"1 9 #LEFTSCANS,1)4" ‘4 
RIGHTSCANS, 1,30): (FR) 

390 PRINT FNC#(0,8):T8' (XD) 

400 PRINT FNCS(0,18):T$' CYT) 

410 PRINT FNCSC6,0) "JANVIER": SPCC16):"FEVRIER":SPC(19):"MARS": 
SPCCI8): "AVRIL"! (LO) 

420 PRINT FNCSC8, 10)*MAI" :SPC(20) ; "JUIN": SPCC18) "JUILLET": SPC 
(18): "AOUT"! (BY) 

430 PRINT FNCS(S, 20)" SEPTEMBRE" :SPCC16) ; "OCTOSRE" :SPCC16) : "NOV 
EMBRE" :SPCC1S): "DECEMBRE" (3$) 

440 FOR 1=22 TO 68 STEP 23° (08) 

450 FOR J=0 TO 28' (NB) 

460 PRINT FNCSCI,J):CHR#(149)' (99) 

470  NEXT J' (F8) 

480 NEXT !' (F8) 

490 FOR H=1 TO 3° (LS) 


500 RESTORE 750' (NP) 

510 FOR 122 T0 8' (LS) 

520  READ JOURS! (LZ) 

530 FOR J=0 TO 69 STEP 23° (YX) 

540 PRINT FNCSCJ,LIGCH)4L): JOURS: "5" (M1) 
550  NEXT J' (F7) 

560  NEXT l' (F7) 


570 NEXT H' (F7) 

580 FOR I=1 TO 12' (NS) 

590 IF I=1 OR 1=6 OR 1=9 THEN RESTORE 760' (OW) 

600 READ COL' (18) 

610 N=M(I)' (EH) 

620 IF B=1 AND 1=2 THEN N=29' (38) 

630 CL:=0' (89) 

640 FOR K=1 TO N' (MJ) 

650 PRINT FNCS$(COL+4+CL ,LIGCINT(CI+3)/4))+V+1) USING "#8": K 
! CKS) 
660 Y=Y+1" (0J) 

670 IF Y)7 THEN CLECL+3:Y=l" (SV) 

680 NEXT K' (FC) 

690 NEXT l' (FB) 

700 6OSUB 150' (J1) 

710 PRINT FNPS$C"VOULEZ-VOUS CONSULTER LE CALENDRIER D'UNE AUTR 
E ANNEE ? (0/N)°,30):' (W) 

720 60SUB 150:IF A1=79 THEN 200' (95) 

730 PRINT CLS$:CNS:END' (OU) 

740 DATA 31,28,31,30,31,30,31,31,30,31,30,31:' (OL) 

750 DATA Lun Mar Mer ,Jeu,Ven Sam Din'' (TF) 

760 DATA 0,23,46,69:' (RN) 


Il est des instructions de langages qui restent 
longtemps obscures jusqu’au jour où l’on se dit 
devant un cas précis avec exemple : ‘‘Bon Dieu ! 
Mais c’est bien sûr !‘*. 

Je crois pouvoir avancer que l’on peut classer le 
DEF FN du basic dans celles-ci. 


Cette instruction permet de définir une fonction 
spécifique à un programme qui renverra une 
valeur déterminée par la formule utilisée dans 
DEF FN. 


Pour rendre les choses plus simples, voyons tout 
de suite quelques exemples. 


1. Vous avez un programme qui doit vous sortir 
10 valeurs de y pour 10 valeurs de x. Soit 
l'équation d’une droite y = 3x +2 
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Le programme pourrait être : 


10 FOR X=1 TO 10 
20 Y = 3*X+2 

30 PRINT Y 

40 NEXT X 


mais il pourrait aussi être : 
10 DEF FNY{X) = 3*X+2 

20 FOR X=1 TO 10 

30 PRINT FNY(X) 

40 NEXT X 





L'intérêt dans ce cas précis est limité, mais il 
peut s'avérer beaucoup plus important dans le 
cas de formules plus complexes. 


2. De la même manière que DEF FN permet de 
définir des fonctions numériques, il permet de 
définir des fonctions sur les chaînes. Ainsi pour 
avoir une chaîne C$ résultant de la 
concaténation des deux premiers caractères de 
la chaîne A$ et des 

trois derniers de la chaîne B$, il faudra faire : 


10 DEF FNCONCATS{AS,B$)=LEFTS{AS,2) + RIGHTS(BS, 3) 
20 A$=''BONJOUR"':BS =''BOURBON"' 

30 C$=FNCONCATS{AS,BS) 

40 PRINT C$ 

la ligne 40 affichera ‘‘BOBON*‘ 





3. On peut même aller plus loin et créer des 
instructions basic à partir de DEF FN 
éventuellement en combinant des séquences de 
codes escape. Ainsi le si pratique LOCATE 
n'existe pas sur le basic PCW. Mais il peut être 
recréé très facilement : 


10 DEF FNLOCATES{C,L)=CHRS (27) +''Y'"+CHRS 


(32+L)+CHRS(32+C) 
20 PRINT FNLOCATES(14,5);'TOTO" 





la ligne 20 affichera TOTO en colonne 14 et en 
ligne 5. 

L'astuce suprême consiste à combiner plusieurs 
fonctions pour en faire une autre (ceci est 
possible, mais à une seule condition : de ne pas 
mélanger des fonctions alphanumériques et des 
fonctions numériques). 

On veut par exemple définir une fonction qui 
cadre à l'écran n'importe quelle chaîne affichée 
sur une certaine ligne. On va se servir pour cela 
de la fonction précédente. 

On étend le petit programme par : 


30 DEF FNCENTRES{XS,L)=FNLOCATES 
((90-LEN(XS))/2,L)+XS 
40 PRINT FNCENTRES{"‘Je suis centré'’,5) 





AS 


la ligne 40 affichera ‘‘je suis centré‘‘ au milieu 
de l'écran en ligne 5. Fabuleux non ? Alors je 
vous laisse réflechir à cela jusqu’à la prochaine 
fois. Mais si toutefois vous avez des idées que 
vous trouvez dignes d'intérêt, n'oubliez pas de 
nous en faire profiter. 


COMMENT REDUIRE V 


VOTRE PROPRE 


MYNEA ET SYNEA POUR PCW SONT DISPONIBLES 
SERVICE TELEMATIQUE ? CHEZ VOTRE REVENDEUR. C'est une exclusivité D.D.I. 


(1) 48.67.28.44 + 
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PROGRAMME BASIC 


par Emmanuel ROCHE 


THEORIE 


Le Jeu de la Vie a été inventé par un 
mathématicien américain du nom de CONWAY 
qui travaillait sur les ‘‘automates cellulaires". 





Le Jeu de la Vie est donc un automate cellulaire. 
Mais qu'est-ce qu’un automate cellulaire ? C’est 
quelque chose qui peut être automatisé, en 
général grâce à un langage de programmation 
(mais rien n'empêche d’en construire un 
mécanique où les engrenages constitueront le 
programme”). C’est aussi quelque chose qui 
dispose de ‘‘cellules”” qui peuvent avoir 
différents états (généralement binaires : ‘‘rempli” 
ou ‘‘vide”” mais rien n'empêche qu'il y ait plus 
de deux états) habituellement de forme carrée 
(pour être visualisée sur une surface 
orthonormée mais, là encore, il est possible que 
ces cellules prennent une autre forme telle que 
rectangulaire, triangulaire, hexagonale, etc du 
moment qu’on puisse ‘‘paver’’ le plan du Jeu. 
Lequel ‘‘plan du Jeu”’ peut aussi prendre 
plusieurs aspects différents tels que ligne, 

surface ou volume !!!). 


Bref, les automates cellulaires peuvent prendre 
une infinité (ou presque) de formes différentes. 
Ainsi, on peut considérer le programme de 
prévision météorologique, dont on nous 
annonce les résultats à la télé, comme un 
automate cellulaire en trois dimensions où les 
cellules sont des ‘‘cubes’” d’air à plusieurs états 
(force du vent, direction, etc) au dessus du 
‘“‘plan”’ de la terre. On introduit les valeurs 
connues des cellules, on lance le programme et 
on voit l’évolution de la situation 
météorologique toutes les heures (pour le Jeu de 
la Vie l’unité de temps s'appelle : Génération.) 


Le Jeu de la Vie est donc un automate cellulaire 
trés simple où les cellules ne peuvent prendre 
que deux états : vivante ou morte sur un plan 
constitué par l’écran de l’ordinateur. Pour notre 
version, en mode texte, vivante se traduira par 
‘‘O”” (o majuscule) et morte par un espace ; le 
plan de l’écran sera constitué de 32 lignes de 90 
caractères au maximum. Le programme 
parcourera donc toutes les cellules les unes 
après les autres pour leur appliquer les règles du Jeu. 









0 00 
0 0 0000 0 0 0 00 (U 00 go 
0 0 0 o0 0 0 00 000 00 00 
00 000 0 ER 0 0 noi nu 00 
00 09 0 oo 0 0 000 00 0 
00 000000 000 0 00 0 ( 
00 0 0 0 
00 0 0 
0 0 0 000 00 00 00 00 00 
9 0 00 0 000 0 000 00 00 00 0 0 00 0 
U Got Vo Un w Go 0 o$ 00 
0 0 000 0608 00 0 000 © 
000 000 0 


Celles-ci sont très simples : on compte le 
nombre de voisins (cellules vivantes) entourant 
chaque caractère. Si une cellule est vivante mais 
n'a pas de voisins, ou un seul, elle meurt 
d'isolement. Si elle a deux ou trois voisins, elle 
survit. (Une cellule est créée s’il n’y en avait pas 
une à son emplacement la génération précédente 
et que cet emplacement était entouré par trois 
cellules exactement.) Par contre, si la cellule à 4, 
5, 6, 7, ou 8 voisins, elle meurt d’étouffement ! 
(des dangers de la surpopulation...) 


Le but du Jeu de la Vie consiste donc à observer 
la vie d’une population de cellules implantées 
par vos soins dans un Territoire dont elles ne 
peuvent pas sortir. Très vite, vous allez voir que 
certaines répartitions et emplacements des 
cellules les conduisent rapidement à la mort au 
bout de quelques générations. D’autres, au 
contraire, resteront stables tant qu’aucuns 
voisins ne viendront les déranger. D’autres, 
enfin, auront l’air de vouloir se reproduire pour 
occuper tout leur Territoire. (Croissez et 
prospérez...) 


EXEMPLES DE POPULATIONS 





La Vie de ces Cellules est étonnamment 
complexe puisqu'elles peuvent croître 
indéfiniment et qu’il est impossible de prédire 
leurs durées de Vie... 


Nous allons maintenant vous montrer quelques 
unes des Populations les plus simples, qui ont 
reçu des noms. 
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NIVEAU : DEBUTANT 





s-c8 


9SSS 


8e 


88 
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Commençons par des populations stables : le FEU ROUGE = 00000 en Génération N°1 
Le plus courant : le BLOC = 00 
00 000 
O 000 en Génération N°2 
le TUB = Lie 000 
00 
la MARE - O © 0°0 
00 O0 O en Génération N°3 
00 00 O O0 
le NID D’ABEILLES = O O O O 0 
00 O oO 
00 00 
le plus grand (?) la CROIX = O O O0 
(0) O0 000 
00 00 O0 OO en Génération N°4 
0 0 000 
O0 O O 
00 
Maintenant, quelques populations périodiques : 000 
(C'est-à-dire qui prennent successivement des O oO 
états bien définis (2 au minimum, 3,4, etc... O O en Génération N°5 
jusqu’à 15 à ma connaissance) puis bouclent tant 
qu'un voisin ne vient pas les déranger.) 000 
le plus simple : O 
le CLIGNOTANT = 080 en Génération N°1 000 
( O0 O0 O 
=  O en Génération N°2! 000 000 en Génération N°6 
O0 0 00 
: 000 
le CRAPAUD = 000 en Génération N°1 O 
000 
O0 
= 0 Oen Génération N°2 ! 000 
O O O 
O O en Génération N°7 
le PULSAR = 000 000 0 0 
0 0 © 0 000 
O0 O0 O O0 (ça ne vous rappelle rien ?) 
0 O O 0 Are (par exemple, le CLIGNOTANT...) 
000 000 se Génération (à votre avis, à quoi va ressembler 
RS Do le FEU ROUGE à la 8° génération ?) 
O O0 O 
O 0 O O o 
O0 (Q O0 0 
000 000 0 
O0 O0 000 000 en Génération N°8 
O O 0 
00 00 0 
000 00 00 000 0 
000000 (Puis 7, puis 8, etc...) 
00 00 en Génération (Celui-ci ne boucle pas en repassant par ses 
00 00 N°2 premières étapes.) 


0 0 00 0 0 
000 00 00 000 


rs ECHO du PCH 


00 00 00 000 Re 

0 Q2 LE HR hert s UE 
6: : 0° 0: Ô 00 " 0 00 do qe ape MIS 
000 00 00 000 or | ox 
000000 


000 000 énCénbration L'Echo, un vrai bouillon de culture ! 
\ Vous pouvez aussi essayer le PENTA- 
DO 0 0e DECATHLON = 0000000000 : dix Cellules à la 
00 00 queue-leu-leu qui génèrent une Population 
00 00 Périodique de période 15. 
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Il y a aussi des Populations Nomades : 
le plus célébre nomade s'appelle le PLANEUR = 


O 
O en Génération N°1 
000 
O0 O 
00 en Génération N°2 
O 
O 
O O en Génération N°3 
00 
O0 
00 en Génération N°4 
00 
O 
O en Génération N°5 
000 


Si vous avez le compas dans l'oeil, vous aurez 
remarqué qu’au terme d’une période de 5 
générations le PLANEUR s'est déplacé en 
diagonale. 

C'est ainsi qu’on peut voir des PLANEURS 
traverser tout l'écran. 


LE JEU DE LA VIE 
en Assembleur 


Je m'étais décidé à programmer un Jeu de la Vie 
en assembleur 8080 (pour pouvoir utiliser MAC) 
quand j'en ai parlé à un ami anglais qui m'a 
appris qu'il y en avait un, caché dans chaque 
PCW ! !! Vicieusement bien caché d’ailleurs, car 
personne n'irait chercher un Jeu de la Vie dans 
un programme CP/M dans un directory 
système dans... LOCOSCRIPT !!! (Est-ce grave 
Dr LOCO?) 


En effet, ce Jeu de la Vie est planqué dans 
MAIL232.COM, lui-même planqué dans le 
directory système de LOCOSCRIPT. La Vie 
vous réserve de sacrées surprises, parfois. 


L'avantage, pour les lecteurs de l’Echo, c’est que 
Marc HERMION 1 déjà parlé de 
MAIL232.COM dans l’'Echo N°10 p.48. 
MAIL232.COM sert à configurer l'interface série 
CPS-8256 : mais, pour le Jeu de la Vie, on n’a 
pas besoin de cette interface (que je n'ai pas). 

Je répète la procédure d'utilisation pour ceux 
qui n’ont pas l’Echo N°10 : vous aurez besoin 
de PIP.COM, SET.COM et DIR.COM que je 
vous conseille de copier (en utilisant PIP) dans 
le RAMDISCK M:. Pour cela, sous CP/M 

tapez PIP M:=A:PIP.COM[RETURN], 

PIP M:=A:SET.COM[RETURNI] et 

PIP M: = A:DIR.COM[RETURN], puis passez en 
M: en tapant M:[RETURN] (L'unité par défaut 
devient M>.). Maintenant, changez la disquette 
en introduisant une copie de l'original de 
LOCOSCRIPT dans le lecteur de disquette A: et 
tapez DIR A: en plus des 4 fichiers présents à 
l’origine, un message s'affiche pour vous 
prévenir que cette disquette a des fichiers 
systèmes. Pour les visualiser, tapez DIRSYS 
(DIRS en abrégé) et 4 nouveaux fichiers 
s'affichent dont MAIL232.COM. Etant donné 
qu'il s’agit d’un fichier système, nous n'avons 
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aucunes possibilités d’agir sur lui. Comme c’est 
ce que nous voulons faire, nous allons lui faire 
changer d'état grâce à SET.COM en tapant SET 
A:MAIL232.COM °DIRS qui nous affichera un 
message disant qu’il a changé la façon dont ce 
fichier est catalogué dans le directory normal et 
que ce fichier est en état de lecture-écriture. 
Nous pouvons maintenant faire ce que nous 
voulons de MAIL232.COM : le lancer bien sûr 
mais aussi le copier sur une autre disquette 
grâce à l'indispensable PIP.COM (par exemple, 
pour ceux qui ont le deuxième lecteur de 
disquette, le copier, avec tous les autres 
programmes CP/M fournis, sur une seule 
disquette ! (ça tient sans problème). Pour 
accéder au Jeu de la Vie, c’est simple : on lance 
le programme par MAIL232.COM[RETURN]|], 
lequel nous affiche quelques instants un message 
puis l’écran s’efface et une bande de menus 
déroulants apparaît. Vous appuyez sur F3/F4 
(FILES) et les options du menu se déroulent : 
RECEIVE, SEND et TRANSFER AS ASCII. 
Vous descendez jusqu’à TRANSFERT et là... 
vous tapez simultanément sur EXTRA et P! 
Immédiatement, l’écran se vide et vous vous 
retrouvez avec un curseur. En effet, ce Jeu de la 
Vie dispose d’un éditeur pleine page qui vous 
permet de positionner les cellules grâce aux 
flèches de direction plutôt que d’avoir à donner 
leurs coordonnées... On n'arrête pas le 

progrès !!! Maintenant, vous n'aurez à vous 
servir que de six touches : les quatre flèches de 
direction pour déplacer le curseur, ENTER (pas 
RETURN) pour créer ou effacer une cellule et la 
barre d’espacement pour lancer le Jeu, quand 
vous avez disposé les cellules à votre 
convenance, et en sortir (retour à la bande de 
menus déroulants). Par exemple, disposez votre 
nom à l'écran et lancez le Jeu : stupeur ! Il y a 
un tigre dans ce programme !!! En effet, celui-ci 
met environ 3 (trois) secondes pour passer d’un 
écran à l’autre. Vous pourrez le constater en 
regardant tout en haut au milieu de l'écran : 
toutes les deux générations, une cellule apparaît 
(Il n'y a pas de compteur de Générations). 


| 


- 
2 

Se 
e 


0 Û 
000 0 0000000 0 D 0 0 0 0 0 0 
û à 000 0 0 0 0 0 000 0 0 0 % 0 où 
U I Wii Li ee as 
ÿ ù ù 0 9 0 0 à 0 Q 0 0 où 000 000 Von 
Ù D Hil hot un 
ù ù CE ooonoo0 à % 0 8 d FE Î 4 
ti 
‘) 0 00 00000006 n 0 0 0 0 à 
000000090000 9 0 00 00 00 
0000000007 (] 0 0 006 
00000000 es î 
Un grand classique, 0 0 0 0 
le carré 13! LE 
















A nous les écrans bien remplis et bien vivants... 
Vous pouvez même imprimer les plus belles 
configurations. D'ailleurs, n'hésitez pas à les 
envoyer à l’Echo qui se fera un plaisir de les 
publier.Il suffit d'introduire une feuille de papier 
et de relever la barre presse-papier : la ligne 
d’état de l’imprimante s’affiche : éteignez-la en 
pressant EXIT, ce qui relancera le Jeu. Quand 
une population vous paraîtra mériter une photo 
de famille, vous pressez EXTRA + PTR, ce qui 
figera le Jeu la durée de l'impression de l'écran 
puis la Vie reprendra son cours... Attention à ne 
pas toucher la barre d’espacement, car cela 
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PROGRAMME BASIC 


interrompra lé Jeu après affichage du Territoire 
et vous réaffichera la ligne de menus déroulants. 
Toutefois, vous pouvez le faire si votre 
Population est morte trop rapidement. Pour 
rejouer, recommencez la procédure. Par contre, 
si vous voulez sortir de MAIL232.COM, tapez 
alors F7/F8 (OFF) qui déroulera deux options : 
Z19/VT52 EMULATION et “RETURN TO 
CP/M + * qu'il faudra choisir en descendant 
dessus et taper ENTER. 


Pour terminer en beauté, permettez-moi 
maintenant de vous dévoiler mes deux 
populations préférées : le pentomino R (comme 
ROCHE) et le carré 13. 


Le PENTOMINO ‘R’’ = c’est le Champion 
toutes catégories de la prolifération. C’est 
pourquoi, pour qu’il occupe le maximum de 
cellules, je le place à mi-hauteur de l’écran, au 
tiers en partant de la droite et disposé de la 
façon suivante : ae 


O 
Essayez ! Vous ne devriez pas être déçus. 


Mon autre favori, plus beau (car géométrique) 
mais qui dure moins longtemps, est plus facile à 
expliquer : il s’agit d’un carré de 13 Cellules 
bien cadrées au milieu de l’écran. 


Mais n'oubliez pas : votre imagination est la seule 
limite à la découverte d’autres populations 
intéressantes. Comme on ne peut pas rendre par 
la parole ou l'écrit la description de Populations 
de Cellules en mouvement sur l’écran, je n’ai pu 
que vous indiquer quelques unes des populations 
que je connais. et je ne les connais pas 

toutes !!! Alors, n’hésitez pas à explorer toutes 
les configurations de Cellules qui vous passeront 
à l'esprit, comme votre nom ou prénom, des 
lignes, des carrées, des triangles, des rectangles, 
des hexagones, etc, etc... 


Vous voilà maintenant en disposition du plus 
beau Jeu : la Vie ! Alors, faites-en bon usage !!! 


POST-SCRIPTUM 


Depuis que j'ai écris cet article, j’ai découvert 
‘“‘Récréations Informatiques‘ (Librairie BELIN) 
dans lequel on parle plus sérieusement du Jeu de 
la Vie ainsi que de beaucoup d’autres choses plus 
intéressantes les unes que les autres que 
j'aimerais bien programmer sur mon PCW mais 
n’en ai malheureusement plus le temps. Y-a-t'il 
un volontaire ? 





LE JEU DE LA VIE + L'ECHO DU PCW N°13 









10 REM Début du programne JEUVIE BAS' (QG) 
20 ‘' (ST) 

30 ‘X = coordonnée latérale de la Cellule ‘ (V5) 

coordonnée verticale de la Cellule' CKK) 

50 ‘NC = Nonbre de Colonnes' (6V) 

60 ‘NL = Nonbre de Lignes' (20) 

70 ‘TAG = Tableau Ancienne Génération' (00) 

80 'TNG = Tableau Nouvelle Génération' (59) 

90 VOISINS = "Y-a-t'il assez de cellules (3) pour en créer un 
é autre 7"! (6h) 


= 
S 
—< 
LL ! 


HO PRINT' (F5) | 

120 PRINT "Jeu de la Vie en Mode Texte"! (Ok) 
130 PRINT Mszzzszsszssszzssssssesesesstt (46) 
149 PRINT' (FE) 

56 FRINT' (F7) 

169 PRINT "Dimensions du Territoire"! (63) 
[70 FRINT fasssss=ssssssesecesassentt ([TS 
180 PRINT' (FA) 

130 INPUT "Nonbre de lignes 
Fy) 

209 INPUT "Nombre de colonnes { {290 ) du Territoire : "inc! ( 
JYi 

210 REM Allez-y mollo ! 32x90 = plus de 3 minutes entre généra 
tions (11! (41). 

220 DIM ter$(2) ,taginl+l ,nc+1),tnglnl+l nc+1)' (VS) 

230 PRINT' (F6) 

240 PRINT "Localisation des Cellules"! (SU) 

260 FRINT "=zzzzzzzsssszszesssssssssstt (NH) 

260 PRINT' (F9) 

270 INPUT "Coordonnées À et Ÿ (Ex, = 5,5) de l'actuelle Cellul 
e ! "ix,v ' (26) 

280 REM ATTENTION ! Pas de cellules hors des limites du Territ 
pire !11' (72) 
290 REM Entrez : 
tions,‘ (43) 
300 IF xty ©) 0 THEN tagtx,y)=1:GOTO 270' (NE) 

310 gen=0iter$(1)=" “itar$(2)="0":REM "0" majuscule! (71) 
320 PRINT' (F6) 


( {222 ) du Territoire : 'inl' ( 


0,0 en dernier, Cela fait démarrer les généra 


330 PRINT "C'est parti,,,"' (53) 
340 GOTO 510' (H2) 
369 Mme " (3) 


360 FOR x«=1 TO nl' (02) 
370 FOR y=i TO nc' (05) 


380 voisins = tag(x-1,y-1)+tag(x-1,y)+tag{x-t y+1)+tag 
Ge,yH)#tagixtl y-Dttagéxtl yhttaglxtt y+l)+tag(x,y-11" CS) 
390 tngx,y)=0" (ME) 

400 IF voisins=3 THEN tngix,y}=1:60TO 420' (VF) 

410 IF voisins=2? AND tag(x,y)=1 THEN tngix vl=l' (4D) 


426 NEXT y' (FI) 

430 NEXT x' (FI) 

QAD = " i9B) 
450 FOR x=1 TO nl' (02) 

46ù FOR v=1 TO nc' (06) 

470 tag(x,y)=tng(x,y)' (20) 

480 NEXT y' (F0) 

490 NEXT x' (FD) 

OO eee anses sée ns areas ! (98) 
510 FOR x=1 TO nl' (OW) 

520 FOR y=1 TO nc' (OP) 


53ù PRINT ter$(tagir,y}+1): :REM LPRINT pour sortie 

sur imprimante," (87) 

540 NEXT y IREM (Attention à la con 
sommation !)° (585 

559 PRINT (REM Idem LPRINT,' (SN) 


560 NEXT x' (F4) 

570 gensgent! PRINT "Génération N°"igen' (WE) 

560 REM Tapez sur {STOP) pour sortir de cette boucle infernale 
[I Q) 

530 6070 360' CHC) 

600 REM Fin du programne JEUVIE,BAS' (NQ) 

610 REN Pour le sauvegarder en ASCII, tapez SAVE "JEUVIE BAS" 

A' (XV) 









EMATIQU 


GESCALC 
INVESTISSEMENT 
PATRIMOINE 
BUSINESS 

PERT 

DEMO : AZERTY 


PACK GESTION | 
REF PGE) 


MULTIPLA.KEY 
STANDARD KEY 
DBASE.KEY 


PACK 
DBASE MULTIPLAN 
REF POM! 


MENU.CMD 
DEMO : AZERTY 





ETIQUETTES DBASE 


PROG1.CMD, PROG.CMD 


ÊÈ PaCx GESTION 1 


E REF  PGE2 


PACK 
UTILITAIRE ? 
= 
PR REF PTUI 





GESTION DE 
STOCK 

ATHEMYS 

SUPER GRAPHE 
EVALUATION 
T.A.O. 

DEMO : TASWORD 


AUTO- 
PROGRAMMATION 
GAG ET SETKEYS 
PRINTER MAKER 
MONITEUR DE DISC 
MATRIX 

LOCASC2 
TABLEAUX ASCII 
DEMO : GRAPHIC 
MAGIC 


PACK JEU 1 
E REF PJE 


PACK = 
GRAPHISME 1 

Lud 

men REF PGRT Da 





Les disquettes thématiques de l'Echo reprennent tous les 
programmes depuis le numéro 1. Bénéficiant des dernières 
améliorations chaque disquette est livrée avec son manuel. 


POKER FOLIES 
AGENDA 

MUSIC MACHINE 
MATHELEM 
LOTO 

OTHELLO 

DEMO : AZERTY 


GSX.BAS 

GSXDAO 

T.A.0. 

LES PLUS D’EXBASIC 
SUPER GRAPHE 
DEMO : GRAPHIC 
MAGIC 


Disponible chez votre revendeur habituel, vous pouvez aussi vous les procurer par correspondance 
à LOGI'STICK CAPN Le Bonaparte - Boîte 49 - 93153 LE BLANC MESNIL Cédex 


Mme. Melle. M. - Nom : 


Prénom : 








Adresse : 








Code Postal : 


Ville : 


Commande par la présente les références suivantes : 


Pays : 





L_ L 








au prix unitaire de 100*F TTC ou de 500*F pour les six références 


réglé par L] CHEQUE [] MANDAT [1] ccP 





Signature : 





CIvISA carten° LILI TIT] ELLE 





Date d'expiration : 


{*) : FRANCE FRANCO DE PORT ET D'EMBALLAGE 
ETRANGER OU DOM-TOM AJOUTER 7 F PAR DISQUETTE 


4021 -7A Xe AUIE 


Notez chacun des articles que vous avez lu et retournez ce questionnaire à 
L'ECHO. Chaque mois, l’auteur dont l’article a obtenu la meilleure moyenne 
se verra attribuer une prime de 1000 F et le lecteur tiré au sort recevra un 


magnifique cadeau-surprise. 
ARTICLE PAGE 

NEWS 6 

INITIATION A DBASE (X) 

ESSAIS SOURIS KEMPSTON 

CARTE BLANCHE A O. COQUIN 

LE JEU DE LA VIE 

INITIATION BASIC (2) 

SPECIAL SALON 

ESSAI : DRIVE 5 1/4 

L'EVASION TELEMATIQUE 

BELGIQUE IL SE MEURT 

LONDRES PCW SHOW 

PROGRAMME TRIFICH 


Nom : 


PASLU TRES MAUVAIS 


MAUVAIS 





NOTES 

. 120 
. 120 
. 120 
. /20 


MOYEN BON 


] [71 











. 120 
. 120 
. /20 
. 120 





. 120 
. 120 








Prénom : 





Adresse : 





NOTEZ BIEN 
NOTEZ MAL 
MAIS 


VOTEZ 


Age : 





Profession : 








Code postal : 
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ARRETER LE TAPAGE NOCTURNE 
Reposez-vouûs, offrez à votre PCW les disquettes de l'Echo du PCW. Saisis 

avec amour'et testés avec passion, les programmes qui les composent sont 
ceux du numéro correspondant... Alors contre l'usure prématurée du 
clavier... une seule solution : Commandez-les ! 


ATTENTION DESORDRE... 


Le numéro d'Avril est introuvable ? Celui de Juin froissé ? 
Comment pouvez-vous supportez cela ? Vous ne pouvez plus, alors d'Echo vous 
le dit... C'est la reliure qu'il vous faut ! Prévue pour classer une année complète 
soit onze numéros, elle garantit la longévité de votre collection et vous fera 
gagner un, précieux temps en recherche et en classement... 


LE CHAINON MANQUANT... 


L'Echo du PCW est le mensuel des PCWistes et depuis son premier numéro de 
nombreux sujets essentiels ont été abordés. L'information qui vous manque est 
probablement dans l’un d’entre eux. Alors ne cherchez plus vainement et 
complétez, sans attendre votre collection avec les sommaires des anciens numéros 
(N°1, 2, 3 et G sont au bord de l'épuisement...) 


es 
ee 
E 
es 
sa 
e 4 





Melle/Mme/M./Sté/Ass*-Nom : 2 


BON Adresse : _ — 
COM MANDE Code Postal : _________ Ville : Re 


COMMANDE PAR LA PRESENTE 




















JOURNAL L'ECHO DU PCW (TVA 7%) 











_— x ABONNEMENT DE ONZE NUMEROS A COMPTER DU NUMERO 14 SOIT …… x 290 (France) S scntee A NR=e D 0T) 
— x ABONNEMENT DE ONZE NUMEROS À COMPTER DU NUMERO 14 SOIT …… x 450 (Etranger et Dom-Tom) = ........... F (TVA = 29,44) 
ANCIENS NUMEROS[112]3[4[5[6[7[8[9/10[11[12] som …. x 30 (France) Sn F (TVA= 1,96] 
anciens NuMERos [1121314/516[71[819[10[11]12] or …. x 40 (Etranger et Dom-Tom) = ........... F (TVA= 2,62) 






































DISQUETTES ECHO DU PCW (TVA 18,6%) 

















































































































Lane x ABONNEMENTS DE ONZE DISQUETTES À COMPTER DU NUMERO 14 SOIT ….… x 690 (France) = ..........F (TVA=108,21) 
IL x ABONNEMENTS DE ONZE DISQUETTES A COMPTER DU NUMERO 14 SOIT …..… x 900 (Etranger et Dom-Tom) = ..........F (TVA=141,15) 
ancenes oisauerres: [1[21314/]5[617[87910[11[12] $orr x 80 (Francel ae F (TVA= 12,55) 
ancIENnES nisQuerres: L1121314[5[6[7[8[91of1[12] sor… x 95 (Etranger et Dom-Tom) = .......... F (TVA= 14,90) 
RELIURE ECHO DU PCW (TVA 18,6%) 
ni XRELIURE DE CLASSEMENT ANNUEL (CONTIENT 11 NUMEROS) SOIT …..… x 80 (France) = ...........F (TVA=12,55) 
sais X RELIURE DE CLASSEMENT ANNUEL [CONTIENT 11 NUMEROS) SOIT …… x 95 (Etranger et Dom-Tom) = ...........F (TVA=14,90) 
Soit un TOTAL TTC |de .......... F 
REGLEMENT A L'ORDRE DE LOGI'STICK PAR Numéro de la Carte 
] MANDAT [1] CHEQUE EL] CCP L ] VISA/CARTE BLEUE! | RSS SSRE ] 
Date d'expiratior 

Tous ces prix sont nets Etranger : Réglement sur le montant hors-TVA par mandat international, Signature oligatoire £ 
et incluent le port et Eurochèque [avec le numéro de la carte) ou carte VISA. Les te ( (celle des tuteurs 

la valeur ajoutée seront réglées aux postiers en vertu des dispositions pour nos lecteurs mineurs) 


l'emballage 
g fiscales dans le pays destinataire et ce, sur la base du total hors-taxe 


en francs français 


ATTENTION, CE BON DE COMMANDE TIENT LIEU DE FACTURE. 
CONSERVEZ-EN UN DOUBLE POUR VOTRE COMPTABILITE. 


A RETOURNER A L'ECHO DU PCW - LOGI'STICK Edition 
L'ECHO DU PCW N°13 28 


Q SPECIAL 
LIGHT PEN 


N BCOMMENT CHOISIR 
SA COMPTA (|) 
M LES CONFIDENCES DE 
LOCOSCRIPT 
M BASIC : GSX - UN DEPART 
SAISISSANT 
BB PROGRAMME : POKER FOLIES 
BB REPORTAGE: AMSTRAD SHOW 
BESSAIS : LIGHT PEN - 3D CLOCK CHESS 
BIORYTHMES - LIVRE JETSAM - AZERTY 


…] Tous les programmes du numéro 1 sont sur la disquette 
== + Une démonstration gratuite d'AZERTY 


SPECIAL 


R° 7 © 
C2 LS 
Q 
& M BASE! : INITIATION (1!) 


DBASE 
LES LIVRES DE DBASE 
LES TRUCS DE DBASE 
M DES CADEAUX POUR PCW 


M TRANSFORMER UN PCW 
EN SERVEUR MINITEL 
LES CONFIDENCES DE LOCOSCRIPT 
BB PROGRAMME : MATRIX - PATRIMOINE 
= 


ESSAIS : TASWORD 8000 - MEDIACOMPTA 
MX330 - CLEF POUR PCW 


= Tous les programmes du numéro 4 
= sont sur la disquette 4 


: SPECIAL 


COMPTA 








/ MB ESSAI : MAILING 
#/ M DBASEII : LES LIVRES 
F4 INITIATION (V) 

M COMMENT CHOISIR SA 


COMPTABILITE (IV) 
M L'EVASION TELEMATIQUE 
M DELUGE ASCII (11) 
LES CONFIDENCES DE LOCOSCRIPT 
= 


LES BONS PLANS DE MULTIPLAN 
PROGRAMMES : PRINTER MAKER 3 - UNE COMPTA 


£ À Tous les programmes du numéro 7 sont sur la 
disquette 7 + Une démonstration gratuite de 
TASWORD 8000 


SPECIAL 
TELECOM- 
MUNICATION 
M DBASEI : 
INITIATION (VIII) 

M COMMUNICATION : 
L'UNIVERS TELEMATIQUE - LES 
LIVRES - RS232 
M L'EVASION TELEMATIQUE 

M DIVERS: DECOUPE BANDES - PCW VECU 
BB CP/M: TOUT SUR LE CLAVIER 
BB PROGRAMMES: PERT - RS/MAKER - OTHELLO 
MESSAIS: MODEM OLITEC - CALVACOM - MAIL232 


È Tous les programmes du numéro 10 
= sont sur la disquette 10 


SPECIAL 
IMPRIMANTE 


BBASIC: AUTOPRO- 
GRAMMATION - DISQUETTE 
DE TRAVAIL 
M COMMENT CHOISIR SA 
COMPTABILITÉ (Il) 
LES CONFIDENCES DE LOCOSCRIPT 
M LANGAGE MACHINE INITIATION (1) 
M DOSSIER : L'IMPRIMANTE 
BE PROGRAMME: PRINTER MAKER - EVALUATION 
M ESSAIS : MULTIPLAN - LE GRAND LIVRE DU PCW 
Ë PROGRAMMATION SUR PCW 


Tous les programmes du numéro 2 sont sur la 
disquette 2 + Une démonstration gratuite d'AZERTY 


SPECIAL 
MUSIQUE 


M DBASE : 
INITIATION (II) 
M CP/M : SETLST 
M TELEMATIQUE : L'EMULATION 
MINITEL 
BLES CONFIDENCES DE LOCOSCRIPT 
1 PROGRAMME : MUSIC MACHINE 
BUSINESS 
BESSAI : COMPAGNON - MX550 - STRIKE FORCE 
HARRIER - PCW10 


Tous les programmes du numéro 5 
sont sur la disquette 5 


SPECIAL 
SOMMAIRE 


MB ESSAI : MEMENTO 
BILAN PLUS 
BB DBASEI : INITIATION (VI) 
BCP/M : TOUS LES LIVRES 
M ANCIENS SOMMAIRES 
THEMATIQUES 
BB L'EVASION TELEMATIQUE 
LES CONFIDENCES DE LOCOSCRIPT 
BB DELUGE ASCII (111) : MULTIPLAN 
BB PROGRAMMES : GESCALC 


È Tous les programmes du numéro 8 sont sur la dis- 
= quette 8 + Un programme inédit et gratuit ! 


SPECIAL 
PROGRAMMES 


M ESSAI : TURBO 
EXPERT BASE 
BB DBASE I! : INITIATION {IX} 
M L'EVASION TELEMATIQUE 
M DEMARRER EN CP/M 
M LOCOSCRIPT LE SECRET DES PAGES 
M INITIATION A L'INTELLIGENCE 
ARTIFICIELLE 
1 PROGRAMMES : MONITEUR DE DISC, LOGOGRAF 
M LOTO, STICKER-MAKER, T.A.O. 


= Tous les programmes du numéro 11 
= sont sur la disquette 11 
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SPECIAL 
ECRAN 


B BASIC : 
COMPATIBILITE CPC/PCW 
M DBASEI : INITIATION (|) 
I COMMENT CHOISIR SA 
COMPTABILITÉ {1ll) 
LES CONFIDENCES DE LOCOSCRIPT 
M LANGAGE MACHINE INITIATION {11} 
M DOSSIER : L'ECRAN 
M PROGRAMME : INVESTISSEMENT - AGENDA 
MESSAIS : LA SOURIS - TOMAHAWXK - ROTATE 
EXBASIC ET LES LIVRES DE MULTIPLAN 


Tous les programmes du numéro 3 
sont sur la disquette 3 


SPECIAL 
PLUS 


MBESSAI : SPOOL 
M DBASE || : LES PLUS 
INITIATION (IV) 
BCP/M: LES PLUS - DELUGE 
ASCII {1} 
M LOCOSCRIPT: LES CONFIDENCES 
LES PLUS 
M REPORTAGE: AMSTRAD SHOW 
M L'EVASION TELEMATIQUE 
1 PROGRAMMES: GESTION DE STOCK - DAO ET GSX 


Tous les programmes du numéro 6 sont sur la 
disquette 6 + Une démonstration gratuite de 
TASWORD 8000 


S 
S 
LS 

© SPECIAL 
JEUX 


M DBASEI : 
INITIATION (VII) 
BLES AVEUX DE MME 
LACAILLE {|} 
BB LIVRE : FICHIER SUR AMSTRAD 
M DELUGE ASCII (IV): RPED 
M LES CONFIDENCES DE LOCOSCRIPT 
M L'EVASION TELEMATIQUE 
M PROGRAMMES : MATHELEM 
BESSAI: GRAPHIC MAGIC - JOYSTICK 
È À Tous les programmes du numéro 9 sont sur la 
.. disquette 9 + Une démonstration gratuite de 


GRAPHIC MAGIC 


SPECIAL 
PAO 


MESSAI : DTP-PAO 
VIDI MX-990, ASTRO 
MB INITIATION À CP/M (2) 
M INITIATION À DBASE (X) 
INITIATION AU BASIC (1) 
M INTRODUCTION À LA PAO 
BE PROGRAMMES : INVEST +, 
VERIFICATEUR B-12, QUIZZ, LOGOTRAM 


Tous les programmes du numéro 12 
sont sur la disquette 12 
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l'écl 


»2CN 


d 


Re 


ENFIN UN CLUB |! 


POUR TOUS LES PASSIONNES 
QUI VEULENT TIRER LE MAXIMUM 
DE LEUR MACHINE 


Démarrant ses activités le 1°" Décembre 
1986, le CLUB ECHO DU PCW sera l'indis- 
pensable complément du magazine. 


Les remises accordées par les revendeurs 
« club » ainsi que les logiciels donnés par le 
club doivent permettrent d’amortir très rapi- 
dement le coût de l'inscription. 


Un bulletin mensuel servira de liaison entre 
les adhérents et comprendra toutes les infor- 
mations à caractère urgent (nouveauté, expo- 
sition) mais aussi l'adresse des revendeurs 
« Club » mise à jour, des programmes inédits, 
des trucs et astuces impubliables (par rapport 
à la quantité} ainsi que des informations 
techniques. 


CE QUE VOUS OFFRE LE CLUB 
Dès réception de votre inscription, nous vous 
ferons parvenir 
- Votre carte personnelle d’adhérent 


- Votre code d'accès à votre boîte aux lettres 
personnelle sur le serveur ECHO 


- Un tableur qui est en train de révolutionner 
l'Angleterre est offert par MML aux adhé- 
rents du club (valeur 450 F) 


- La liste des revendeurs « club » de toute la 
France chez qui vous obtiendrez les meilleu- 
res remises. 


TOUTE L’ANNEE 


- Vous recevrez régulièrement votre bulletin 
de liaison. 


- Vous pourrez participer aux stages organi- 
sés par l’Echo du PCW selon des conditions 
très avantageuses. 


- Vous pourrez utiliser et consulter en toute 
liberté votre boîte aux lettres personnelle sur 
le serveur de l'Echo. 


- Etre invité personnellement à toutes les réu- 
nions ou exposition organisées par l’Echo du 
PCW. 


Pour faire partie des privilégiés du PCW, 
n'attendez-pas, inscrivez-vous pour une 
année au CLUB DE L'ECHO DU PCW et 
retourner le bon ci-dessous à : 
CLUB ECHO DU PCW, LOGI'STICK Edition 
CAPN Le Bonaparte, Boîte 49 
93153 Le Blanc Mesnil Cédex 





- Sd : - 

















J'adhère pour une année à compter du / / au club de l'ECHO DU PCW 
NOM : __ PRENOM : AGE : 
ADRESSE : 

VILLE : CODE POSTAL : 
TEL. : PROFESSION : 





Tarif pour une année : France 350 F - Etranger 495 F 





Signature obligatoire : 


Etudiants et chômeurs : France 290 F - Etranger, DOM-TOM 390 F 
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BASIC 2° partie 


Les premiers programmes 





par Patrick BIHAN 


KR eprenons le programme donné en 
exemple le mois dernier. Celui-ci servait à 
calculer la surface et le volume d’un 
parallélépipède de la façon suivante : 


1 LONGUEU 
2 LARGEUR 
3 HAUTEUR 
4 SURFACE = LONGUEUR * LARGEUR 
5 VOLUME = SURFACE * HAUTEUR 

6 PRINT SURFACE 

7 PRINT VOLUME 


13 


R = 
= 5 
= 7 


Tout un chacun aura certainement remarqué que 
les lignes sont numérotées de manière 
ascendante. Imaginons un bref instant qu'une 
ligne ait été oubliée, par exemple, entre la ligne 
n°5 et la ligne n°6 : 


LUN OUR PNR 


Comment l'intégrer dans le programme ? En fait, 
il y a plusieurs solutions qui se présentent. Pour 
le débutant, refaire tout le programme ! Pour le 
lecteur de l’Echo, il peut : 


- renuméroter toutes les lignes automatiquement, 
avec la commande RENUM, laquelle renumérote 
les lignes de 10 en 10, comme ceci: 


RENUM [return] 


10 LONGUEUR = 13 
20 LARGEUR = 5 

30 HAUTEUR = 7 
40 SURFACE = LONGUEUR * LARGEUR 
50 VOLUME = SURFACE * HAUTEUR 
60 PRINT SURFACE 

70 PRINT VOLUME 


Il suffit ensuite d’ajouter la ligne 
55 PRINT ‘’ RESULTATS‘ 











simplement en entrant cette ligne ainsi. (Notez 
que, pour une raison que l’on verra plus tard, il 
est obligatoire de mettre entre guillemets 
l'argument de PRINT si cet argument est une 
chaîne de caractères, comme un mot ou une 
phrase). 

Si l'on prend ensuite la peine de relire le 
programme en entrant la commande LIST, nous 
voyons apparaître à la bonne place la ligne 
ajoutée : 


10 LONGUEUR = 13 

20 LARGEUR = 5 

30 HAUTEUR = 7 

40 SURFACE = LONGUEUR * LARGEUR 


50 VOLUME = SURFACE * HAUTEUR 


55 PRINT ‘’RESULTATS" 
60 PRINT SURFACE 
70 PRINT VOLUME 





Donc, premier constat : il est bon d'écrire les 
numéros des lignes de 10 en 10, car cela laisse 
entre deux lignes consécutives la possibilité d’en 
ajouter 9 autres. À chaque ajout, la nouvelle 
ligne se met automatiquement au bon endroit. 
Notons, par ailleurs, que rien n'empêche de 
rajouter plus de 9 lignes entre deux : 
simplement, il faudra refaire RENUM à chaque 
fois. Dans l'exemple précédent, la 55 deviendra 
60, la 60 deviendra 70 etc. 


Cela dit, revenons à notre parallélépipède. Ce 
splendide programme présente un léger défaut 
(ah ! déjà ?). En effet, à chaque RUN que nous 
ferons, nous obtiendrons toujours le même 
résultat, à savoir 455. On peut légitimement se 
demander s'il ne serait pas possible d'améliorer 
le programme de telle façon qu'il permette de 
calculer le volume d’autres parallélépipèdes. 
Rassurons le lecteur : c’est possible ! Et de 
plusieurs manières. La plus simple pour le 
débutant est de corriger avec EDIT les valeurs 
dans les lignes 10, 20 et 30. Mais cela 
deviendrait vite fastidieux. Pour optimiser 
l'entrée de nouvelles valeurs, il est beaucoup 
plus simple de le faire de façon dynamique, 
c'est-à-dire dans l’exécution du programme. 
Pour cela, nous userons de la commande 
INPUT, laquelle signifie ENTREZ (une valeur, 
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cher ami). Comment l'utiliser ? Simplement en 
indiquant, à sa suite, dans quelle variable il 
convient de l’entrer. Reprenons le programme 
précédent : 


10 INPUT LONGUEUR 

20 INPUT LARGEUR 

30 INPUT HAUTEUR 

40 SURFACE = LONGUEUR * LARGEUR 


50 VOLUME = SURFACE * HAUTEUR 
55 PRINT ‘RESULTATS’! 

60 PRINT SURFACE 

70 PRINT VOLUME 


Les lignes 10, 20 et 30 ont changé. Elles sont 
faites de telle façon qu'à l'exécution du 
programme, le système, ne connaissant pas le 
contenu de LONGUEUR, LARGEUR et 
HAUTEUR, s'arrête automatiquement et 
demande à l'utilisateur d'entrer une valeur. Par 
exemple, si nous entrons RUN, le système va 
afficher un point d'interrogation. Cela signifie 
qu’il a rencontré un INPUT, en l'occurrence 
celui de la ligne n°10, et attend tout 
bonnement que l'utilisateur entre un nombre. 
Entrons par exemple 19 et aussitôt, l'ordinateur 
affiche de nouveau un point d'interrogation ; 
pourquoi ? Dès que nous avons entré le nombre 
19, le système à mémorisé le fait que 
LONGUEUR vaut 19 maintenant, exactement de 
la même manière que si on lui avait 
expressement indiqué : LONGUEUR = 19. S'il 
affiche de nouveau un point d'interrogation, 
cela veut dire qu'il a de nouveau rencontré un 
INPUT. Effectivement, et nous ne laisserons par 
le suspens plus longtemps, il y en a un autre; et 
où, je vous prie, jeune homme ? Mais dans la 
ligne 20, pardi ! Eh oui ! Il faut donc de 
nouveau entrer une valeur, laquelle sera celle de 
LARGEUR. Entrons 15, toujours pour 
l'exemple, et que se passe-t-il, maintenant, chers 
lecteurs ? Eh bien, encore une fois, un point 
d'interrogation surgit sur votre écran vert. Sans 
problème, vous avez reconnu la demande 
pressante du Basic vous demandant d’entrer la 
valeur de la hauteur. Sans hésiter, vous 
obtempérez, en entrant 12 (par exemple) et 
vous obtenez finalement l'affichage suivant : 


RESULTATS 
285 


3420 


Tout a bien fonctionné. On peut maintenant 
calculer toute une série de volumes 

quelconques. Il suffit de refaire RUN à chaque 
résultat. Si d'aventures il advenait que vous ayez 
réellement une série de calculs répétitifs (comme 
calculer plusieurs volumes de parallélépipèdes, 
ou n'importe quoi d'autre), on peut même 
intégrer la commande RUN dans le programme 
pour n'avoir pas à l'écrire manuellement, en 
ajoutant la ligne suivante : 


CRAUN 
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Un peu de méthode 


Après ce premier contact avec le Basic, on peut 
maintenant se demander comment résoudre de 
manière efficace un problème quelconque et le 
transcrire en BASIC. Nous allons vous proposer 
une méthode qui a fait ses preuves. Cette 
méthode n’est pas applicable à tous les 
problèmes, ce serait trop beau, mais va 
permettre au débutant de structurer sa pensée. 


Analysons maintenant le problème suivant. Soit 
un prix hors taxes quelconque. Soit un taux de 
TVA, égal à 18.6%. Comment calculer le prix 
TTC ? 


Tout un chacun, confronté à ce simple problème 
arithmétique, sait qu’il peut multiplier le prix 
hors taxes par 1,186 pour obtenir le prix TTC. 
Ou bien, ce qui revient au même, utiliser la 
formule suivante : 


Prix TTC = Prix Hors Taxes + 
(Prix Hors Taxes * TVA /100) 


Dans ce dernier cas, la formule est un peu plus 
longue, mais nous allons néanmoins l'utiliser, 
ceci dans un but didactique. 








Note importante: Rappelons au lecteur certaines 
conventions au préalable : 


e Le signe de la multiplication s'obtient avec 
l’astérisque, *, et non la lettre X majuscule, 
X. 

e Le signe de la division est la barre oblique /, et 
non les deux points, :. 

e Le zéro est un 0 barré, et non la lettre ©. 

e Tout nom de variable s'écrit OBLIGATOI- 
REMENT en un seul mot, et je ne le répéterai 
pas ! Par exemple, la ligne précédente doit 
être impérativement énoncée : 

PrixTTC = PrixHorsTaxes + 
(PrixHorsTaxes * TVA/100) 

° Peu importe si le nom d’une commande 
BASIC ou celui d’une variable est écrit en 
majuscule ou en minuscule dans le 
programme. Pour le système, 
input 
Input 
INPUT 


sont identiques. Evidemment, PrixHorsTaxes 
et PHT sont différents ! 

e Le point sert de virgule ! En effet, si l’on veut 
exprimer un nombre décimal, comme 18,6 
par exemple, il faut l’énoncer en Basic de la 
manière suivante : 18.6. Le point séparateur 
est ici le point décimal ; la virgule en Basic à 
un autre sens. 

e Le signe du pourcentage, % , ne sert pas à 
calculer des pourcentages. Il ne faut donc pas 
l'utiliser comme tel. Nous verrons 
ultérieurement sa signification ; pour l'instant, 
un pourcentage se calculera simplement en le 
divisant par 100 (ça, c’est possible !). 


BASIC : 2° PARTIE + L'ECHO DU PCW N°13 








Si l’on veut exprimer le fait que TVA = 18.6, 
on ne dira pas : 


TVA = 18.6% ; c’est faux ! Il faut bien dire 
TVA = 18.6 

e Si l’on utilise des unités quelconques, il ne 
faut pas les exprimer dans une formule : 

Il est faux de dire : PHT = 120 francs, par 
exemple, ou LONGUEUR = 12 mètres, pour 
la simple et bonne raison que le Basic ne sait 
pas ce que sont des francs ou des mètres : il 
ne connaît que des nombres et des lettres, pas 
leur sens. 

e Pour améliorer l’entrée des valeurs, on 
s'aperçoit qu’un misérable point 
d'interrogation sur l'écran renseigne fort mal 
sur la valeur sensée être demandée. Attentifs 
comme vous l’êtes, vous avez déjà pensé à 
l'affichage suivant : 


5 PRINT ‘’ Entrez la longueur ‘’ 
10 INPUT LONGUEUR 

15 PRINT ‘’ Entrez la largeur’’ 
20 INPUT LARGEUR 


25 PRINT ‘’ Entrez la hauteur’’ 
30 INPUT HAUTEUR 





C’est pas mal (au cas où vous y auriez pensé. On 
peut cependant faire la même chose en 
raccourcissant le programme avec une extension 
de la commande INPUT, comme ceci : 


10 INPUT ‘’ Entrez la longueur ‘’; LONGUEUR 
20 INPUT ‘’ Entrez la largeur ‘’;LARGEUR 


30 INPUT ‘’ Entrez la hauteur ‘’; HAUTEUR 





Remarquez les guillemets obligatoires, ainsi que 
le point-virgule. Les débutants confondent 
souvent cette syntaxe avec une autre, qu'ils 
créent de toutes pièces, et donc fausse : 


10 PRINT ‘’ Entrez la longueur ‘’; LONGUEUR 


par exemple. Cette ligne n’est pas fausse du 
point de vue syntaxique, car elle affichera 
simplement la phrase énoncée et la valeur de 
LONGUEUR (au départ, si une variable n’a pas 
encore reçue une valeur, elle vaut quand même 
O), mais est fausse dans son but, car ce dernier 
est en l’occurrence de permettre d’entrer une 
valeur. INPUT s'impose donc ici. 


Pour en revenir au problème posé, comment 
énoncer en Basic le programme correspondant. 
La méthode que nous vous proposons de suivre 
est inspirée en fait du langage Pascal, dans 
lequel tout programme se doit d’être structuré. 


Si l’on regarde bien ce problème, on note qu’il y 
a plusieurs types de valeurs. Il existe des valeurs 
connues dès le départ, comme TVA par 
exemple, dont on sait qu’elle vaut 18,6. Par 
ailleurs, il existe d’autres valeurs qui sont, a 
priori, inconnues de l'utilisateur, par exemple le 
prix hors taxes (que l’on va appeler pour aller 
plus vite PHT) et le prix toutes taxes comprises 
(que l’on va appeler PTTC). 


Plus précisément, si PHT est inconnue, en 
revanche PTTC est connue sans être connue, si 
l’on peut dire. En effet, PTTC n’est pas connue 
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au départ car c’est justement le résultat 
recherché, mais est formellement connue par sa 
définition mathématique, 


PTTC = PHT + (PHT * TVA/100) 


Ainsi, on peut donc voir pour l’instant.trois 

types de valeurs, que l’on nomme le plus 

souvent des variables, car susceptibles de varier : 

- Variable connue, comme TVA. 

- Variable inconnue au départ , comme PHT. 

- Variable inconnue au départ, et de plus issue 
d’un calcul, comme PTTC. 


On peut également imaginer que, pour résoudre 
un problème, même de manière non- 
informatique, il faut utiliser une certaine 
logique, fort simple au demeurant, laquelle dirait 
qu'il faut impérativement un certain ordre dans 
l'énoncé de la résolution. On nomme cela, cette 
recherche de l’ordre, faire un algorithme (avec 
un ‘‘i” et non un ‘‘y’’). Cet ordre est évident 
dans le problème du calcul du volume d’un 
parallélépipède. On se doute que pour calculer 
ce volume, il nous faut au préalable connaître la 
surface et la hauteur ; or, la connaissance de la 
surface dépend à l’évidence de celle de la 
longueur et de la largeur. Conclusion : 


Pour ce calcul, il nous faut connaître, dans 
l’ordre : 


1 - La longueur 
2 - La largeur 


3 - La surface 
4 - La hauteur 
5 - Le volume peut donc se calculer. 





Par ailleurs, on peut constater que les étapes 1 
et 2 peuvent permuter, ainsi que la 3 et la 4 par 
exemple. Par contre, la 3 et la 5 ne peuvent le 
faire. 


Ainsi, on s'aperçoit que, pour faire ces calculs, 
un ordre qui peut être changé quelque peu est 
nécessaire. Pour avoir cependant une bonne 
méthodologie, nous vous conseillons de faire 
l’analyse toujours (du moins au début), ainsi : 


1. Recherche des variables connues, 
Attribution d’un nom et de sa valeur, 


2. Recherches des variables inconnues 
° 2.1 Variables simples, 
Attribution d’un nom 
e 2.2 Variables issues d’un calcul 
Attribution d’un nom et de la formule 
de calcul 
Mise en ordre logique de calcul des 
formules précédentes, et numérotation 
des lignes du programme. 


Le lecteur débutant résoudra immanquablement 
la plupart des simples problèmes qu'il se posera 
avec cette méthode. On peut ajouter à la suite 
de cet algorithme qu'il convient de préciser, en 
3° partie, l'affichage des résultats. Si l’on affecte 
à chaque opération décrite une commande 
Basic, on trouve : 


INITIATION BASIC 


Solutions possibles : 













































exemples : 


1. Recherche des variables connues, 


- Attribution d’un nom et de sa valeur, TVA = 18.6 Surface du cercle : 


Algorithme 


2. Recherches des variables inconnues Programme 


1. Variables connues : 
PI=3.1416 
2. Variables inconnues 


2.1. RAYON 


+ 2.1 Variables simples, 


Attribution d’un nom INPUT PHT 10 PI = 3.1416 


e 2.2 Variables issues d'un calcul 
Attribution d'un nom et de la 
formule de calcul 


20 INPUT ‘’Entrez le rayon‘ ; 
RAYON 
30 SURFACE = PI * RAYONA2 


40 PRINT ‘’Surface = ‘’ ; SURFACE 


2.2 SURFACE =PI#RAYONA2 
3. Affichage des résultats 


° Mise en ordre logique de calcul des PTTC=PHT+ 
formules précédentes {PHT+TVA/100). 


3. Affichage des résultats PRINT PTTC 





Vous remarquez que le programme suit 

rigoureusement la méthode indiquée. On 
Voici une liste de petits problèmes à résoudre comprend donc qu'un programme de ce type 
selon la méthode indiquée. Essayez de les faire suit en fait trois étapes : 
sans lire la suite. Conseil : faites d’abord le 
programme à la main, en l’écrivant en suivant 
l'algorithme. Beaucoup de débutants ont 
tendance à croire que c’est en frappant sur le 
clavier que l’on devient programmeur. Or, toute 
démarche intellectuelle passe d’abord par le 
cerveau, non ? (bon tant pis). 


- Déclaration des valeurs, 
- Calculs divers, 
- Affichage des résultats. 


Ce dernier point est à étudier maintenant de 
près. La ligne 40 du programme précédent 
indique qu'il faut afficher deux choses : 


«6 


- ‘ Surface = 
- Calcul de la surface du cercle : - SURFACE 


SURFACE = PI * RAYON? ue 
Quelle est la différence entre le mot surface 


entre guillemets et le mot SURFACE ? Aucune si 


- Calcul de la surface du trapèze : on ne tient pas compte des majuscules. En fait, 
il y en à une, et importante. Le mot ‘‘surface‘* 

SURFACE = entre guillemets signifie qu'il doit être pris tel 

PETIT COTE + GRAND COTE/2 * HAUTEUR quel, c’est-à-dire que le système doit l'afficher 
sur l’écran (ici suivi en plus du signe ‘= ‘‘). En 

? : revanche, le mot SURFACE (qui aurait pu être 
- Calcul de la surface du triangle équilatéral : également écrit surface) suivant représente bien, 
SURFACE = COTEZ/4 * 3 quant à lui, une variable, c’est-à-dire un nombre 


ici. Si par exemple la surface calculée est 233, 
nous aurons sur l'écran : 


- Calcul de la surface du pentagone : Surface = 233 


SURFACE = 5/8 * RAYON? * /10+2*x1/5 


Par contre, si l’on avait omis les guillemets, 
nous aurions eu, avec ceci : 


- Calcul de la surface d’une ellipse : 


SURFACE = 
r/4 x GRAND DIAMETRE"*PETIT DIAMETRE 


40 PRINT surface ‘’="’ surface 
233 = 233 


On notera quand même le rôle du point-virgule 
avec PRINT. Ce signe oblige le système à 
afficher les deux valeurs l’une près de l’autre. 


C’est tout pour aujourd’hui. 


Et les autres programmes, me direz-vous ? Eh 
bien, vous aurez la solution la prochaine fois, 
vous répondrais-je. Au revoir, et cherchez en 
attendant ! 
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Pour ce qui concerne les PCWistes, les 

nouveautés ne vont pas manquer et l’Echo s’est 
décarcassé pour en faire une petite sélection en 
publiant à leur attention le plan PCW du salon. 


L'organisation de notre présentation suit l’ordre 
alphabétique et mentionne le nom des éditeurs 
ou distributeurs ainsi que leur titre avec une 
mention spéciale pour les nouveautés. 


AMSTRAD FRANCE 
GRANDE RUE 
92310 SEVRES 

TEL (1) 46.26.34.50 


La grande nouveauté est indiscutablement le 
PCW 9512 qui mérite un petit détour. 
L'observateur pourra goûter du LOCOSCRIPT 2 
en version française, du délicat clapotis de 
l'imprimante à marguerite. 


ALTITUDE XXI 

119/123 RUE DE SAUSSURE 
75017 PARIS 

TEL (1) 40.54.02.15 


Institut de formation à part entière, ALTITUDE 
XXI dispense le savoir sur des sujets aussi variés 


le recours des utilisateurs débutants et peu 
fortunés. 


NOUVEAUTE : Un cours d’autoformation sur 
disquette pour la prise en main du PCW au prix 
de 295 F HT. 


BORLAND 

65 RUE DE LA GARENNE 
92318 SEVRES 

TEL (1) 45.07.15.11 


Seul motif de visite, le fameux Turbo Pascal, 
mais autrement les nouveautés brillent par leur 
absence. 
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que LOCOSCRIPT ou MULTIPLAN. Il peut être 
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COBRA SOFT 
18 RUE FRUCTIDOR 
71100 CHALON/SAONE 





Stand 
TEL 85.93.20.01 
A voir ou à revoir la ruée vers l’or dans un jeu 
passionnant qui se résume en deux 
mots :‘‘Histoire d'Or‘: ! 


COTE OUEST 

3 RUE FABERT 
44100 NANTES 
TEL 40.35.55.00 


Un éditeur sympathique qui présente une 
comptabilité sans garantir de démonstration sur 
PCW... 





D.D.I. 

CENTRE D'AFFAIRES 
PARIS NORD Stand 

LE BONAPARTE BOITE 37 

93153 LE BLANC MESNIL TEL (1) 48.67.28.44 


Le paradis des PCWistes. Les nouveautés sont 
nombreuses et mériteront une visite soutenue. 
Un coin PAO avec souris KEMPSTON, 
digitalisation VIDI raccordée sur une caméra 
SONY et visualisation sur télé couleur. Le coin 
ASTROLOGIE avec Etienne MEZO l’auteur qui, 
astrologue confirmé, présentera la totalité des 
logiciels ASTRO I, II, III et couple. Enfin le 
coin télématique avec les musts SYNEA et 
MYNEA en pleine action... 

NOUVEAUTES : Le lecteur 5 Pouces 1/4, une 
nouvelle interface centronics parallèle à 550 f 
TTC, GRAPHIC MAGIC, BOURSE 2000, 
HERAKLIOS et l’onduleur miracle PROTECH. 





EDITIONS EYROLLES 
61 BLD ST GERMAIN 
75240 PARIS CEDEX 05 
TEL (1) 46.34.21.99 


Editeur de livres, EYROLLES présente de 
nombreux ouvrages susceptibles de passionner 
les PCW. A noter les ouvrages de Patrice 
BIHAN ‘‘BASIC et FICHIERS‘‘ tome 1 et 2 et 
de nombreux ouvrages sur l'intelligence 
artificielle et la P.A.O. 






Stand 


ELP 

1 RUE BARBOTIN 
79300 BRESSUIRE 
TEL 49.65.26.36 


Seul produit marquant mais de grand intérêt : le 
logiciel FICHE qui se charge de vos fichiers et 
leur personnalisation sous LOCOSCRIPT. 





GUILLEMOT 

BP 2 

56200 LA GACILLY 
TEL 99.08.90.88 


Grossiste réputé, GUILLEMOT distribue de 
nombreux logiciels pour PCW et se démarque 
particulièrement par la présentation du Hit de 
DOMARKK inspiré du dernier JAMES BOND : 
Tuer n'est pas jouer et c’est un jeu ! 
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Parc des Expositions 
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a HP ELECTRONIC LOGICYS 
B21 | 7 CH. DU TROU AU LOUP CENTRE EMERAUDE 
| Stand 95150 TAVERNY CIDEX 46 
no © TEL (1) 39.95.82.82 33150 CENON 
Distributeur de fournitures en tout genre, HP TEL 56.40.94.75 


propose des housses PCW à des prix canons ! Il n’est plus utile de présenter LOGICYS et 
l’ensemble d’une gamme fournie en matière de 
[620 MN stand 





LA COMMANDE logiciels comptables. 


SE RDA Facturation DAMOCLES dernière version, 


27920 ST PIERRE ALIENOR, comptabilité générale et différents 
DE BAILLEUL modules complémentaires et enfin TALOS pour 
TEL 32.52.54.02 une gestion efficace des devis. 


La commande c’est DBASE II, DBASE II et rien que En somme, le bonheur des PME, PMI à petits 
DBASE II, mais c'est déjà pas mal ! budgets. : 
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LORICIEL 

81 RUE DE LA PROCESSION 
92500 RUEIL MALMAISON 
TEL (1) 47.52.11.33 


Fameux éditeur de jeux, LORICIEL présente 
trois logiciels qui méritent vraiment un détour : 
BOB WINNER, ORPHEE et TOP SECRET qui 
sont tous les trois des jeux d’aventures et de 
rôles accompagnés de superbes graphismes. 





MICRO-APPLICATION 
13 RUE SAINTE CECILE 
75009 PARIS 

TEL (1) 47.70.32.44 


Micro-application vient en force avec quelques 
uns des best-seller sur PCW. Deux ouvrages 
remarquables dont la bible du PCW et une 
pléthore de logiciels professionnels allant du 
compilateur DBASE en passant par la gestion de 
fichier DATAMAT. A visiter absolument. 


MICRO C 

3 BD DE BEAUMONT 
35000 RENNES 

TEL 99.31.76.41 


Un seul produit, mais un bon ! C’est Cherry 
Paint le logiciel de dessin assisté qu’il faut 
admirer avant de craquer pour tout autre 
chose. 


POWER PRODUCT 
COURS DE LA GARE 
60200 COMPIEGNE 
TEL 44.83.48.48 


Distributeur de DTP-PAO, POWER PRODUCT 
présente le fameux scanner MASTERSCAN et la 
souris AMX. 


SYBEX 

6/8 IMPASSE DU CURE 
75018 PARIS 

TEL (1) 42.03.95.95 


Editeur d'ouvrages, SYBEX propose une 
collection particulièrement attrayante pour les 
passionnés d’assembleur Z-80 et de CP/M Plus. 
C'est probablement l'éditeur le plus technique 
que l’on puisse trouver pour ce qui concerne le 
PCW. 


NOUVEAUTES : Techniques de programmation 
en Turbo Pascal et AMSTRAD Turbo Pascal. 


TEST (GROUPE) 

5 PLACE DU COLONEL FABIEN 
75010 PARIS 

TEL (1) 42.40.22.01 


En la présence de PSI, le groupe test propose 
quelques uns des ouvrages les plus appréciés par 
les PCWistes de tous niveaux. A consulter 
absolument, Clef pour AMSTRAD tome 2 et 
CP/M PLUS sur AMSTRAD. 
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UBI SOFT 

1 VOIE FELIX EBOUE 
94000 CRETEIL 

TEL (1) 43.39.23.21 


On s’amuse sec chez UBI avec trois jeux de 
choc : Tuer n’est pas jouer, Annales de Rome et 
le fameux Trivial Pursuit. Voilà le stand rêvé 
pour montrer à ses enfants que le PCW est une 
machine de grandes personnes ! | 





Stand 





WALDATA 

7 SQUARE SURCOUF 
91350 GRIGNY Stand 
TEL (1) 69.06.56.48 ss 


Nouveau venu sur le marché PCW, WALDATA 
compte bien y faire son trou et présenter son 
basic étendu décrit dans les news de ce même 
numéro. 





Les revendeurs 


Indépendamment des éditeurs susceptibles de 
vendre directement, lés revendeurs spécialisés 
en PCW ont aussi leur place à AMSTRAD 
EXPO et pour faire l'acquisition de 
l'indispensable accessoire qui manque toujours, 
ils seront aux postes pour vous aider et vous 
renseigner : 


Les voici avec leur numéro de stand: 


ARTS ET BUREAUTIQUE SERVICE - H34 
GENERAL VIDEO - G1 

HYPER CB - B1 

LA REGLE A CALCUL - C6 

VIDEO SHOP - G24 


LOGI'STICK ET L'ECHO DU PCW 


Pour terminer modestement, vos serviteurs 
seront présents dans les stands A13 et sur une 
surface de 36 m2? ce qui se fait de mieux sur 
PCW sera présenté. Vous pourrez trouver tous 
les Echos parus, les disquettes Echo et 
thématiques, les reliures et le catalogue 
entreprises ainsi que de nombreux échantillons 
des papiers à en-tête personnalisés que l’Echo a 
réalisé. Un graphiste sera d’ailleurs présent pour 
vous permettre d'envisager la réalisation de tous 
vos listings en continu comme les factures, les 
bulletins de paye et autres bordereaux. 


- LOGPSTICK en collaboration avec DDI 
présentera pour la circonstance ses derniers 
logiciels de la gamme 88. 


-’A suivre de près, la série ASTRO présentée par 
son auteur, l’ensemble de PAO comprenant 
souris, digitaliseur VIDI, scanner et logiciel de 
PAO mais aussi, fruit de récents accords avec 
ESAT SOFTWARE, les très attendus BOURSE 
2000 et HERAKLIOS. 


Cette petite présentation terminée, il ne nous 
reste qu’à vous souhaiter une excellente visite 
dans le temple AMSTRAD ou le PCW, comme 
nous venons de le voir, est loin d’être laissé 
pour compte ! 


BANC D'ESSAI 










MATERIEL 





LE PCW 
S OUVRE AU 


Sile mot compatibilité revêt bien des formes au point qu'il finit 
par nous embrouiller complètement, il devient lumineux quand 


il concerne un point précis de l'alliance de deux 
programmes ou ordinateurs d'origines différentes. Le 
problème est d'autant plus crucial quand une 
même application se retrouve sur deux 
machines au format de disquettes distinct. Ce 
problème se pose journellement aux nombreux 
utilisateurs qui possèdent un PCW et qui, 
parallèlement, ont accès à un PC. Comment 
faire pour exploiter un fichier créé en DBASE II 
sur 3 pouces avec un DBASE III dont le PC qui 
le fait tourner n'accepte que des disquettes 5 
1/4 pouces? Cruel dilemne auquel PACE a déjà 
trouvé une solution que je vous présente enfin 
après presque quatre mois de vie commune et 
de tests sans pitié. 


EE Présentation 


Le lecteur PACE se présente sous la forme d'un 
boîtier robuste en tôle peinte d'un beige crème 
plutôt passe partout. Deux cordons s'en échappent. 
Le premier est destiné au secteur et fournit 
l'alimentation du lecteur qui, de ce fait, n'utilise 
pas celle du PCW. C'est une très bonne chose 
puisque le lecteur 5 pouces consomme plus que le 
3 pouces et cela évite les désagréments liés aux 
parasitages et éventuelles baisses de tension. 
L'autre cordon, en nappe, est terminé par une 
broche équivalente à celle du deuxième lecteur 
AMSTRAD et sert au véhiculage des données et au 
contrôle du lecteur. 

La connexion prend 10 minutes et se fait selon les 
étapes suivantes : 

1. Démontage du capot arrière (6 vis à retirer). 

2. Suppression du cache de la face avant du PCW 
(à l’aide d’un couteau chaud). 

3, Connexion du Lecteur sur la broche d’un cable, 
en nappe, contenu dans le PCW. Tous les PCW à 
un lecteur ont ce cable car il est initialement prévu 
pour le second lecteur 3 pouces. 

4. Remise du capot arrière. 

5. Branchement du lecteur au secteur et c'est 
terminé. 


En résumé : Ni soudure, ni adaptation tordue, ni 
interface supplémentaire comme c’est souvent le 
cas. Connexion facile; on branche et ça marche. 


Le Utilisation : 


Une fois raccordé, le lecteur PACE fonctionne 
exactement comme un second lecteur 3 pouces. 





Par Marc HERMION 
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Les disquettes sont formatées à l'aide de DISCKIT 
et la double tête du lecteur permet d’avoir accès à 
720 Kilo-octets sans qu'il soit utile de retourner la 
disquette. Au niveau du CP/M c'est tout aussi 
identique. Le lecteur est connu sous l'appellation 
de B: et sa gestion est similaire. 


Les plus : 


ei oi oi ei où el fl 


L’Economie ! 


Les avantages sont nombreux et celui qui nous 
concerne en premier lieu est d'ordre économique : 
le prix des disquettes. Pour le montant d'une 
C2FDD on se procure 5 à 10 disquettes 5 pouces 
1/4 ! 

L'économie est énorme et l'amortissement du 
lecteur se fait très rapidement si l'on est un gros 
consommateur de disquettes. 

La compatibilité ! 

Elle est double : CP/M et MS/DOS... 

Elle présente un intérêt pour tout utilisateur de 
PCW ayant accès à un PC et voulant récupérer les 
données de l’un pour les traîter sur l’autre (et vice 
versa). 

Ainsi, les fichiers DBASE pourront passer 
indifféremment d’une machine à l’autre. 

Cette compatibilité est valable pour tout ce qui 
concerne les fichiers de données et les fichiers de 
textes (ASCII), voilà comment elle s'obtient avec le 
lecteur PACE : 

Un interrupteur placé au dos du lecteur permet 
l'adaptation physique du lecteur à chacun des 
formats. soit position 40 TPS pour MS/DOS et 80 
TPS pour CP/M. A ce niveau Ce n'est pas trop 
difficile. ; 
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CANLORPAEEZN 


L'autre aspect de la double compatibilité est 
purement logiciel à savoir conversion de format 
d’une disquette 5 pouces en B: vers une disquette 
3 pouces en A: ou vice versa. Ce problème est 
réglé par le logiciel TDOS livré avec le lecteur. Il 
effectue le passage de l’un à l’autre avec une 
déconcertante facilité et de façon totalement 
transparente. Notre intervention se limitant à 
donner le nom du fichier de départ et d'arrivée 
pour que TDOS se débrouille comme un grand ! 


Attention ! La compatibilité MS/DOS et CP/M 
n'intervient pas au niveau des programmes en cela 
qu'un programme développé sous CP/M ne pourra 
fonctionner sous MS/DOS (et vice versa). Seuls les 
fichiers générés par ces programmes sont 
compatibles. Cette notion est très importante car le 
terme compatibilité est assez imprécis. 





EXEMPLE : Vous utilisez DBASE au bureau, sur un 
PC (MS/DOS), et vous créez des fichiers et des 
commandes pour la gestion des données. Le 
DBASE que vous utilisez sur PCW n'est pas le 
même mais vous pourrez toutefois convertir les 
fichiers du DBASE PC pour qu'ils soient utilisables 
avec le DBASE PCW car ils sont identiques dans 
leurs organisations mais pas dans le format du 
disque qui les contient. 


EXEMPLES DIVERS : Les fichiers LOCOSCRIPT 
sauvés en ASCII pourront être récupérés sur PC sur 
des logiciels comme: WORD, WORDSTAR 2000, 
TEXTOR.. (et vice versa toujours !) 

Cela peut aussi exister pour certaines 
comptabilités. Pour le vérifier demandez-le à son 
concepteur (Il doit vous certifier la compatibilité 
des fichiers c'est tout). Dans tous les cas, si le 
programme qui vous préoccupe est commercialisé 
en version CP/M et MS/DOS, vérifiez toujours 
auprès de l'éditeur ou du distributeur la 
compatibilité des fichiers. 

Le défaut de la cuirasse : 

Sachant que le lecteur PACE est en double f&e, 
double densité, le seul lecteur 3 pouces restant 
disponible ne peut être que le lecteur A. Il faut 
donc en tenir compte puisque les fichiers à 
convertir ne pourront excéder la capacité de 
stockage d’une disquette C2F soit 173 Ko. Dans le 
cas de fichiers plus importants, il faut alors soit les 
scinder en plusieurs morceaux soit les transférer 
par d’autres moyens (par l'interface série par 
exemple). 


La robustesse ! 


Indéniablement, le lecteur PACE est d’une 
robustesse hors du commun puisque connecté 
depuis plus de 6 Mois sur le serveur de l'Echo (24 
heures sur 24 !), il n’a jamais donné le moindre 
signe de défaillance et à cette heure, il ronronne 
toujours aussi délicatement !. 


Les moins : 


Les disquettes. 


Si les disquettes sont moins chères, elles sont aussi 
moins fiables comparativement aux disquettes 3 pouces. 
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La manipulation doit être aussi attentive que 
l'espoir que l’on a de leur longévité. Bien rangées 
en permanence, on proscrira poussière, humidité et 
toutes formes de manipulations mettant en danger 
le disque qui n’est pas protégé par un boîtier rigide 
comme c'est le cas des 3 pouces. 

L'erreur souvent fatale consiste à éteindre ou 
allumer le lecteur avec la disquette à l’intérieur, 
bien peu d’entre elles survivent à cette 
manipulation et la prudence est de rigueur. 


L’encombrement.…. 


L'autonomie à ses avantages mais aussi ses 
inconvénients. Le PCW perd, par le raccordement 
du lecteur, son aspect compact. C’est une question 
de goût et chacun est juge. 


Les identités presque remarquables ! 

Temps d'accès en lecture et en écriture, capacité, 
utilisation et raccordement (à l'exception de 
l'alimentation) sont identiques à ce que propose un 
second lecteur 3 pouces. Le prix aussi est 
sensiblement identique (l'économie réalisée avec 
les disquettes et l’inutilité de toute interface 
spéciale font tout de même pencher la balance vers 
le PACE). 





ses En conclusion. 


L'intérêt du PACE est limpide. Compatibilité 
MS/DOS et économie importante sont des 
arguments de poids qui donnent un aspect 
dérisoire aux reproches qu'on peut lui faire. 

A mon humble avis c’est assurément 
l'investissement le plus intelligent pour tout 
utilisateur professionnel ou mordu d'informatique 
dont les goûts et les besoins évolueront forcément 
vers une ouverture sur les compatibles. 

Comme dit le proverbe : Qui peut le plus peut le 
moins ! 


FICHE TECHNIQUE 


MATERIEL : LECTEUR DE DISQUETTES 5 POUCES 1/4 
FABRICANT : PACE (G.B) 

DISTRIBUTEUR : DDI 

PRIX PUBLIC : 2500 F TTC 





Dscanner master can 

O 2'lect. disquette 3” 

Ointerface série/parallèle 

O stylo optique “électric studio”... 
O souris “électric studio” 

Odigitaliseur …. 


PROMOTION 


Oruban impr. (par 4) 
D disquette CF 2DD (par 10) 


Des boîtes géniales pour ranger vos supports 
D pour aisquettes 5° 1/4 

0 pour disquettes 3° et 3° 1/2 

© pour cassettes 






























Oclockchess 





Daliénor… 1450F 
Oastrot ...... 450F 
Dastro2 ..…. 950F 
Dastro3 2000F 
Dastro couple . 600F 
Oautoformation assembleur 295F 
Oazerty 245F 
Obatman ....... 155F 
Obobwinner 240F 
Obridge player 210F 
Ocobol (notice anglaise) 550F 
Ocompagnon … 280F 
Dcompta alphasoft 1175F 
Ddamocles 1750F 
Ddatabase toolbox 745F 
Odatamat PCW 395F 
Cdbasell . 190F 
Cdrdraw … 790F 
Odrgraph 790F 
OOTP.PAO 395F 


210F 
160 F 
99F 


22, rue de Montreuil 94300 VINCENNES -— Tél. : (1) 43.28.22.06 
OUVERT DU MARDI AU VENDREDI de 10 h 30 à 13h et de 15 ha 19 h, LE SAMEDI de 10h 30a19h 


REVENDEUR OFFICIEL AMSTRAD FRANCE 








extension horloge 


Vesme 


Cette extension va vous permettre d'avoir en perma- 
nence non seulement l'heure à la seconde près mais éga- 
lement le jour de la semaine et la date du jour. De 
plus un système d'alarme programmable vous évitera 
de rater l'heure de l'apéritif ou du film à la TV 
Grâce à des piles (non fournies) cette extension 
restera active même lorsque vous aurez arrêté votre 
PCW et gardera en mémoire les instructions que vous 
aurez programmées dans ses 50 bytes de RAM non 
volatile. 


extension horloge : 


Cpour PCW 499F 





PCW 8256 
PCW8512 























C] rallonge clavier .... 
1 housses (clavier + impr. + 


LL 





boîtier auto-répondeur synéa 
câble minitel pour synéa 
] rallonge câble imprim. + alim. 


[] rubans imprimante (par 2} 
[] disquette CF2DD...... 


câble téléphone synéa . 


VENTE AUX COLLECTIVITES : 
numéro réservé 48.86.92.84 


SUPER-PROMOTION 


POLYMAIL + POLYWORD (version française) .. 460F 295 F 


EVUQLT ATOS CAT EUEULE 


PCW 9512 


DISPO, | 


l'ordinateur avec imprimante à marguerite 





LOGICIELS 





DTP-PAO + souris AMX 895F 
IDTP-PAO + souris + master scan 1595F 
enchanter ; 265F 
exbasic 220F 
fact. + gest stock 2099F 
Ifairlight 150F 
Ifrank bruno's boxing 185F 
guardian ::::63555.:504 170F 
guild ofthieves ......... 225F 
head over heels 165F 
heathrow air control + southern 160F 
Iheraklios 350F 
histoire d'or 250F 
la paie crésus (logicys} 1175F 
loca printer 350F 
mailing . Ce 450F 
master file 8000 550F 
Imaster scan ............... . 895F 
meditor 1990F 
mercitel 1190F 
}multiplan 499F 


mynea 
opticaisse 
orphée. see 
pascal/MT+ ........ 
PCW graph 

PCWpaint . 

pocket wordstar 

polymail + polyword (promotion) 
Iquick mailing 

spool 

Jstarglider 

Jsteve davis snooker 
strike force harrier ... 
Isynea 

tastrinpt 8000 
Jtasword 8000 
Jtomahawk 

top secret ..... 
trivial pursuit 

Jtuer n'est pas jouer 
lturbotutor 











U Hjoystick competition PRO 


LIVRES 


ñ 


{ Jamstrad PCW guide basic 
amstrad locoscript 
bien débuter avec votre PCW 
clets pour amstrad PCW 
CP/M sur amstrad CPC et PCW 
gestion sur amstrad PCW 
introduction à DBASEII ... 
M'univers du PCW . 

la bible du graphisme 

le grand livre du PCW asmtrad 
le livre de l'amstrad PCW 

le livre du CP/M plus 

le livre du logo PCW 

modèles multiplan PME 
Imultiplan sur amstrad 

progr. avancée GW basic 
programmation sur PCW 

















Interface manette 


Enfin vous allez pouvoir jouer sans “tricoter” avec 
vos doigts sur le clavier. Vous pourrez également 
utiliser le joystick dans votre propres programmes 
que ce soit en basic ou sous CP/M. 
Interface manette : 

Dinterface joystick PCW 

Dinterface joystick + joystick compté. PRO 


399F 
499F 


PRODUITS DK TRONICS 


Interface manette + 
synthétiseur 


Interface joystick + contrôleur de son: 
En plus de la possibilité de brancher un joystick, vous 
avez la possibilité de créer des sons ou de la musique 
sur 3 canaux et 8 octaves. De plus un port entrée/ 
sortie vous permet le contrôle d'appareils externes. 
Interface manette + synthétiseur : 


Opour PCW . 








extension 256 K RAM 


Que ce soit en traitement de texte, gestion de fichier 
ou tout autre application cette extension mémoire vous 
permettra d'être plus “à l'aise” et vous évitera d'in 
cessants accès disque 
extension 256 K : 


Upour PCW 8256 399F 


COMMENT COMMANDER : Cocher le(s} article(s) désiré(s) ou faites-en une liste sur une feuille à part - Faites le total + frais de port (20 F pour achats inférieurs à 500 F, 40 F de 500 à 1000 F. 60 F pour achat sup. à 1000 F. 80 F pour achat sup à 2000 F) 


NOM — — 





ADRESSE 


JE POSSEDE: 








PCW8256 
CODE POSTAL 








TEL. 


DO PCW8512 


VILLE 











Tous nos prix sont indicatits 


Mode de paiement : L 1 chèque / L] mandat / [] contre-remboursement (prévoir 20 F de frais) — envoyer le tout à : ORDIVIDUEL, 20, rue de Montreuil 94300 VINCENNES. [] 









TOUT NIVEAU 





COMMUNICATION 


L'EVASION TELEMATIQ 


LES SERVEURS SYNEA 
S'INSTALLENT 
DANS NOS REGIONS... 







Consultez les services 
télématiques pratiques mis en 
place par des PCWistes 
communicatifs ; ce mois-ci les 
numéros de deux nouveaux 
services sur PCW nous ont été 
transmis : 





été développés, offrant ainsi de nouveaux 


Club de Hand Ball de Villemomble services aux utilisateurs du PCW. Les logiciels 
télématiques en sont un exemple parmi d’autres. 


Rendez-vous des matchs et entraînements 

Informations sur le club Le champ d'utilisation de la télématique est très 
large et peut souvent prêter à confusion, dans la 
mesure Où il sort de l’image traditionnelle du 


micro-ordinateur travaillant tout seul sur un coin 
Fonctionne tous les jours de 9h. à 18h. de bureau. 


Plan de situation du gymnase (utile pour les 
clubs adverses !!) 


Enfin des sportifs qui ne se courront pas après 
pendant la semaine et qui arriveront en forme 
au moment de la compétition hebdomadaire. 


Ses utilisateurs sont souvent des professionnels, 
aux activités multiples et variées. Avec la 
multiplication des services pratiques 
professionnels et la diffusion désormais massive 
des minitels, la télématique concerne aussi bien 
les petites et moyennes entreprises, les 
professions indépendantes, les associations 
sportives et culturelles, les établissements 
FOREZ NAUTISME (St Etienne) scolaires et les collectivités locales. 


Bonne saison aux handballeurs (euses) de 
Villemomble. 





Activités, Boîtes aux lettres, Commandes, Infos, 


Petites annonces Les besoins en matière de télématique dépendent 


bien évidemment de l’activité des utilisateurs : 


Un service qui devrait faire plus d’ avi : Li 
ce qui devrait faire plus d'un navigateur. ceux-ci se divisent en deux groupes : 


heureux dans les régions lyonnaises et 
stéphanoises. - les utilisateurs de l'outil minitel : cela peut 
aller de la consultation de l'annuaire 
électronique pour en extraire les adresses à 
LA TELEMATIQUE POUR QUI, titre de prospection commerciale, du souci de 
POUR QUELS BESOINS, réduire la facture minitel lors de la 


AVEC QUELS OUTILS ? consultation de services professionnels, 


d'imprimer les pages consultées sur 


Les utilisateurs de l'outil PCW forment un l'imprimante du PCW. 

éventail très large d'activités. L'utilisation - les prestataires de services : ils passent d’un 
première de la machine est sans nul doute le coup de l'autre côté du minitel. Ce sont 
logiciel de traitement de texte Locoscript qui maintenant les autres qui, avec leur minitel et 
répond de façon immédiate et relativement depuis n'importe quel endroit de France, vont 
simple aux besoins d'édition de courrier et pouvoir interroger le PCW, obtenir des pages 
autres documents. Depuis bientôt 2 ans d'informations diverses (catalogue, petites 
d'existence du PCW, de nombreux logiciels ont annonces,.….), laisser un message ou consulter 
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les messages qui leur sont destinés, passer une 
commande. 


- Des outils logiciels simples développés pour le 
PCW répondent précisément à ces besoins; nous 
vous les avons présentés en détail dans les 
précédents numéros de l'écho. Leurs utilisateurs 
sont maintenant nombreux en France; à partir 
du prochain numéro, nous leur laissons la plume 
pour nous présenter leur besoin initial, leur 
expérience télématique, les éventuelles 
difficultés rencontrées et les bénéfices apportés 
par ces nouveaux outils. 








MYNEA 


La bourse par minitel : 
faites fortune avec votre PCW 


de partie: l'exploitation 
des _Pa de la bourse. 


par Germain DELALANDE 





Rappelons la démarche des deux précédentes 
parties de cette étude. L'objet a été de consulter 
un service boursier sur le 36.15 (MONEY dans 
notre exemple, mais il y en a bien d’autres.) de 
mémoriser régulièrement et de façon 
automatique les cours des actions de valeurs 
sélectionnées au départ, d'extraire les seules 
informations utiles par l'option Masques de 
Mynéa et de les reprendre par un programme de 
commandes DBASE IT. 


Pour étoffer notre propos, nous avons traité les 
cours des actions de SAINT GOBAIN, ELF- 
GABON et des CIMENTS FRANCAIS. 


Rappelons le contenu du fichier de commandes 
automatiques créé sous RPED et permettant la 
consultation du service boursier et la 
mémorisation automatique des cours du jour des 
actions visées. 


43 


Les trois pages minitel 
sont d’abord 
sauvegardées 
provisoirement sur le 
lecteur M lors de la 
consultation du service, 
puis définitivement hors 
connexion dans le 
fichier CIM.VID ; elles 
viennent s'ajouter aux = 
pages minitel 
sauvegardées lors des 
sessions précédentes. 


Vous avez demandé 
Cours précédent 
COURS DU JOUR 
- Ouverture 
Clôture 
Variation 
+ haut de l'année : 
Toutes les pages tbas de l'année 
d'information minitel 
sauvegardées ont été 
traitées par les masques, 
ce qui a permis de 
constituer un fichier 
ASCII CIMENTS.ACT 


Une autre valeur :NOM E 


Ce fichier a ensuite été traité par le programme 
Boursel.cmd (voir 2° partie) permettant de 
récupérer les cours des valeurs dans le fichier 
BOURSE2.DBEF dont la structure est la suivante : 





Le fichier bourse2 étant constitué et bourré 


d'informations, il est possible de le consulter par 
des commandes DBASE afin d'analyser les 
variations de cours. 


EVOLUTIONS DES COURS 
JOURNALIERS DE CHAQUE ACTION 
ENTRE LE 03/08/87 et le 05/10/87. 


Voir figures page suivante. 


list structure 

STRUCTURE DU FICH . 

RE D'ENREGIS ; 
DATE DE LA DERNIERE M : 00/ 
BASE DE DONNEES PRIMA 
CHANP NON TYP 
00! DAT C  @5 
doc NOM C 016 
003 CPR C 8 
004 CJQ C 008 
005 CJC C 08 
006 VAR C 8 
607 PHA C 08 
008 PBA C 008 
009 PER C 008 
## TOTAL #6 00078 
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TOUT sur une valeur 


Elf-Gabon 
1086,00 F 


PAGE: 6 / da) 


: le 12/08 


1099,06 F 
1036,00 F 
+1,48 
1199,00 F 
1%,0 F 


Revenir à la psc Pr nie Retour 
oute la bourse Sommaire 


Envoi 





Figure 1 


Merci. 

avec Mynéa 
et Money 
mon argent 
se porte 
bien ! 


Figure 2 


Structure 
du fichier 
DBASE 
pour le 
traitement 
des données 


B:BOURSEZ .DBF 
DS 00 


ISE 
IRE ù UE D' Marron 


COMMUNICATION 


é‘" Jes Ciments 
dat nom,cie for nome 'Saint 
H/08 Saint Gobain : 


Gobain 


de Ia partie 2 en juillet, ont tout gagné. Qui a 
dit que la bâtiment était en crise ? Il semble par 
contre que la mer est fort agitée au large des 
côtes Gabonnaises. 


000 1 13 4 Gao ba L nn 


QOOIT  AT/08 Saint Gobain 

SA/0S Saint Gobhain \ 
GQOOIS  £L/08 Saint Gobain 475,10 
5 OS Saint Gobain 153,10 
QL/1G Saint Gobain . 10 


AS, 06 








LE CLUB ECHO, C’EST L’AFFAIRE 
DU SIECLE ! 
N'OUBLIEZ PLUS LE CLUB ET TOUS SES 





Figure 3 


AVANTAGES... 


. dist dat nom, cje for nomz'Eit 
QUO 03/05 Elf-Gabon 
| Elf-Gabon IG3E, QG 
Eif-Gatron 1075 Go° 
Eif-Gaban JE 
Eif-Gabon 
00017  XB/0E EIf-Gabon 
QQCr27 7408 ElLf-Gabon 


QOQ%A  GL/10 Eif-Gabon 





MMA EOGART NE HU MPHRE Y 
MEME 5 1/02/1989 CIEL 6 74894 


IGNATURE 
Cette cafe stnctement personnelle SIG XXX 
donne droit a toutes les activites du Club 


2933 GO 
che de 2 810 


543,00 





Figure 4 


. List dat nom,cjc for noms 'Ciments 
Q0OQU G3S/0E Ciments francais 1043, 00 
GUQ04 12/05 Ciments francais 1004, 00 
00007 15/08 Ciments francais 1010, Gù 
QGO1G  Z1/08 Ciments francais 1006,00 
QOQUS 24/08 Ciments francais 

GOOTR  ZS/0E Ciments francais 

QOQSQ  L7/0Ë Ciments francais 

QQOES 06/10 Ciments francais 


Inscrivez-vous 
avec le bon 
situé en 

pages centrales) 


A eNNITAUIREE 








Soit onze numéros 
pour 290 F 

au lieu de 330 F 
prix normal 





Figure 5 £ 
DEN ABONNES ! 


n'oubliez pas 
de nous 
signaler votre 
changement 
d'adresse. 


Progressions : Saint Gobain + 4,6 % 
Elf-Gabon - 13,3 % 


A s ; (Bon de commande en pages 
Ciments Français + 11,4 % PE 


centrales, feuillet détachable) 





Les PCWistes qui ont ‘‘joué 
Français comme nous vous l’avions proposé lors 


Figure 6 Voilà, sous DBASE, la liste journalière de nos actions 
— —  ‘“‘Ciments Français” 


. dist for nom='Ciments francais 
Q00QG1 O3/08 Ciments francais 1034 ’ oQ 


= 


Li OO Où Cr 10 à 


1035 00 1043 00 +0,87 1IES,00G  7£5,0 
JE à 


| 
00004 12/05 Ciments francais 1008,00 101E,00 104,00 +0,20 iiés, 00 #5,0 15, 
60007 15/08 Ciments francais 1010,00  1G15,00  1016,00 +0,00 1165,00  7£6,6 14, 
QGG1IQ 21/08 Ciments francais 1012,00 1010,00  1006,00 0,53 1IE5,00 745,0 En 






103556,00 1048 ( +2,74 
1041,09 1070,00 +1,90 
1136,00  11#5,00 —Z,17 
1175,00  1164,00 -0 03 


3 + 


1165,00 
1165,00 
1165,00 
1250,00 


09013 24/08 Ciments francais 10QZS 








25/08 Ciments francais 1060, ,00 
1150, 00 





00020 27/05 Ciments francais 
QQ00E5 OG/10 Ciments francais 


NE BE 
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NN otre vaillant PCW semble être en 


bien mauvaise posture dans le pays 
ou même le Maneken Pisse est, dit-on, une copie 
d'une copie d’un original dont ont aurait perdu 
toute trace. 
Commercialisé sous la bannière de SCHNEIDER, 
grossiste germanique, le PCW n'a pas, dans ce 
pays, eu le succès qu’il a pu rencontrer dans 
bien d’autres pays d'Europe. Interviewé lors de 
l'Expo BURO 87, le sicob belge, André VAN 
CAMPENHOUT, responsable de la division 
belge de Schneider, attribue cette infortune au 
fait que la machine est été relativement mal 
comprise par le public et surtout, d'un manque 
total de promotion, comme se l'était permis 
AMSTRAD France en investissant un joli petit 
paquet de francs dans deux campagnes télé. 
Il faut avouer que le problème belge n'est pas 
simple. Pour un marché dix fois moins 
important que le marché français, on recence 
deux langues en parfait état de fonctionnement 
qui obligent tout distributeur à dédoubler leur 
production pour l'adapter à chacune des 
ethnies. Vous imaginez le travail, manuels, 
emballage et publicité, tout doit être fait en 
flamand et en wallon : un joli casse-tête ! 
Résultat, SCHNEIDER loupe le coche du PCW 
pour concentrer son énergie et surtout ses 
moyens dans le PC qui 
semble indiscutablement 
plus porteur au goût des 
uns mais aussi des autres. 
L'entretien avec Monsieur 
VAN CAMPENHOUT se 
termine sur une note aussi 
gaie qu'un lundi à 
Maubeuge (mais où est le 
rapport ? NDLR) : il nous 
apprend qu'il leur reste 
beaucoup de machines sur 
les bras mais pire, il ne 
peuvent envisager de les 
vendre en France, la 
marque étant déjà déposée 
par un autre qu'eux. 
Comble de dépit, il révèle 
que le PCW 9512 ne verra 
même pas le bout d'une vitrine 
belge avant deux siècles. 
Exit PCW ! Pour se convaincre d’une telle 
désolation, il ne reste qu’à s’en assurer auprès 
d’un revendeur pris au hasard. La FNAC 
Bruxelles est 
donc choisie 
pour cible... Le 
résultat est à la 
mesure de nos 
espoirs... Un 
vendeur surpris 
par la demande 


AMSTRAD 






6 au 9 Novembre 87 


Parc des Expositions 
PARIS Porte de Versailles 





Alain Hoebrechts en pleine action. 
Il ne jure que par le PCW ! 





d'accessoires sur le Joyce (c’est son nom de 
guerre) nous chuchote qu'on ne demande pas 
d'accessoires pour une machine à écrire Comme 
si nous venions de lui demander la version hard 
cord de Blanche 
Neige et les sept 
nains... une fois ! 
Sur ces premières 
impressions, nous 
pensons que le 
parlement 
européen serait 
mieux à Strasbourg 
et nous nous en 
allons vers le 
dernier bastion du 
PCWisme avancé 
en nous rendant 





chez le meilleur de tous... Computer Market ! PU 
Bien nous en prit. Nous découvrons un PCW le dernier 
traité avec égards et bien entouré de la ri 
compagnie de ce que la planète compte de du PCW... 


mieux en matière de logiciels et d'extensions, à 
sa cause, dévoués. 

A leur tour, interrogés, Madame et Monsieur DE 
VELDER, dynamiques gérants de l'endroit, nous 
apprennent qu'ils s'étaient fait un point 
d'honneur à défendre contre vents et marées 
notre adorable petit PCW 
et que bien leur en avait 
pris. Abandonnés de tous, 
les utilisateurs irréductibles 
avaient fini par tous 
atterrir dans leur magasin 
afin de s'y procurer ce 
que plus personne d'autre 
ne voulait stocker. 
Courageuse attitude qui 
leur permit rapidement 
d'attirer des quatre coins 
de la Belgique (même 
flamande !) les PCWistes 
en mal de bons produits. 


Maintenant, COMPUTER 
MARKET 2, vient de voir 
le jour pour mieux suivre 
une demande qui ne cesse 
de croître. Une boutique 
superbe et une équipe sympathique et compétente 
qui supervise parfaitement. Mieux, on organise des 
cours sur PCW et suprême luxe, c’est ALAIN 
HOEBRECHTS (OTHELLO cf Echo 10) qui s’en 
charge. 


Les PCWistes belges ne sont donc plus seuls, et l’on 
peut s’en réjouir car rien n’est plus pénible que 
de posséder un matériel que personne ne veut 
suivre... Mais rassurons les amis de Tintin : s’il ne 
reste qu'un seul PCW en Belgique, il sera chez 
COMPUTER MARKET ! | 
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UAND LE PCW FAIT SON SHOW 
ÇA BOUGE DANS LES COTTAGES ! 





L'abréviation est trompeuse. 

PCW c'est Personnal Computer Word (le monde de 
l'ordinateur personnel) qui est l’un des premiers maga- 
zine généraliste de micro-informatique en Grande- 
Bretagne. Le show ou plus modestement, le salon, 
est organisé chaque année au centre des expositions 
d'Olympia à Londres. 

Si ce n’est pas le plus grand des salons britanniques 
de micro, c’est probablement celui qui bénéficie du 
plus fort impact dans le monde mouvementé des 


S | 
Î de nombreuses marques s'y 


côtoient poliment, peu d’entre elles 

affichent de fracassantes nouveautés. La plus 
marquante, évidemment est ce mystérieux 
PCW 9512 dont on nous cachait tant les 
spécificités. Vu de loin, il se veut résolument 
différent de ses nobles ancètres et il faut 
s'approcher de plus près, poser ses doigts sur le 
clavier pour vraiment découvrir les similitudes. 
Premier essai, l'introduction d'une disquette 
système pour PCW 8256... Le gueux reste 
indifférent et l'hôtesse hilare révèle que le drive 
livré en standard est en double face double 
densité Comme le second drive des versions 
actuelles... Humilié jusqu'à la garde, il ne reste 
qu'à tenter la seconde épreuve de feu. 


Sans crier gare, 

le clavier du 9512 est remplacé par un clavier 
AZERTY de 8256 et, sous le regard sidéré de la 
même hostesse, chaque touche fonctionne 
parfaitement. Un point partout, l'hôtesse est 
vexée et c'est compréhensible : le clavier du 
nouveau venu à été totalement réorganisé et les 
vieux briscards risquent sérieusement d'être 
longtemps déroutés.. Touches de fonction à 
gauche, nouvelle organisation des touches 
[STOP], [EXTRA], [EXIT] ou [PTR], enfin tout 
pour contrarier les bonnes habitudes. En tout cas, 





Paroles de PCW 9512 : ‘Vous me reconnaissez ? Pourtant vous 
êtes nombreux à m'avoir sous les doigts. 


passionnés et des professionnels. 


le test par l'échange prouve que l'organisation 
hard n'a pas dù être trop bouleversée pour que 
l'ancien clavier fonctionne aussi bien. 


Côté soft, 

c'est locoscript 2 qui retient l'attention des 
observateurs. Plus rapide et plus performant, il 
dégage totalement l'utilisateur de l'usage de 
CP/M pour des opérations comme le formatage, 
le transfert ou l'impression via le port 
centronics des textes qu'il gère. 


L’imprimante à marguerite, 

quant à elle, rompt fermement avec ce qui se 
faisait jusqu'à présent. Lente et bruyante, elle 
sait capter l'attention des plus sourds ! 

Adieu petits dessins, au revoir PAO, l'ordinateur 
laisse place à une machine à écrire, comme il 
fallait le croire depuis le début... 

A vrai dire, cette machine semble assez batarde 
et son succès paraît beaucoup moins évident que 
celui des 8256 et 8512. Pour preuve, le peu 
d’affluence à son chevet hormis quelques 
Français pour qui elle semble revêtir des attraits 
particuliers... Dernier détail d'importance, le 
prix affiché de 4999 Livres Sterling laisse 
entrevoir un prix de vente en France aux 
environs de 5400 F (soit plus 10% par rapport 
au marché britannique, sûrement le coût de la 
traversée du canal (vivement le tunnel !) 


Passant à d'autres exposants, le PCW reprend sa 
véritable dimension d'ordinateur choyé et très 
suivi par les éditeurs anglais. Un nouveau stylo 
optique s'affiche sans vergogne à 200 F prix 
public ce qui ne manque pas de surprendre... 


Autre nouveauté du salon, 

le Z-88 qui symbolise le retour du héros, Lord 
SINCLAIR qui, détrôné par Alan SUGAR, dû 
rendre armes et bagages pour aller en pénitence 
du côté de Cambridge. Il en revient revivifié, 
avec une nouvelle et, probablement géniale, 
invention. Le Z-88 n'est pas un ordinateur au 
sens le plus connu du terme, mais un terminal 
portable destiné à être interfacé avec les 
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meilleurs micros du marché. Le PCW en faisant 
partie, c’est en sa compagnie que le constructeur 
le présente au public. Questionné sur l'utilité 
d’une telle machine, un vendeur du stand s'en 
explique très clairement. Aucun ordinateur 
même portable n'est aujourd'hui capable, et 
pour un prix modique de moins de 2000 F, de 
permettre une saisie de données sur le terrain 
pour un transfert ultérieur via RS-232. 

C'est un pari difficile mais qui peut séduire par 
la précision de la cible visée et l'esthétisme 
raffiné d'une machine qu'on aimerait posséder 
ne serait-ce que pour la regarder. 


CAMBRIDGE COMPUTER : 
La renaissance de SIR CLIVE SINCLAIR commence par un 
branchement 2-88 sur PCW 8512 ! 





Côté logiciels, 

Les éditeurs anglais ne Chôment pas non plus. 
AMS présente la version PCW, pas totalement 
terminée, du célèbre PAGEMAKER qu'il 
positionne déjà comme le successeur potentiel 
de tout ce qui se fait actuellement. IT faudra 
patienter pour vérifier la justesse d'une telle foi 
dans ce produit. 

Autre logiciel en cours de finition, l'intégrateur 
développé par KEMPSTON ct HISOFT. Destiné 
à fonctionner conjointement avec sa souris, le 
logiciel libère l'utilisateur de toute manipulation 
au clavier pour toute opération sur les fichiers. 
Copie, lancement, tout est obtenu par cliquage 
et la tradition est totalement respectée par la 
présence de la poubelle (où l'on jette les fichiers 
sans intérêt en deux coup de clic !), l'accès à 
une calculatrice et à différentes fonctions de 
bureau qui ne sont pas sans rappeler ce que l’on 
trouve maintenant sur de nombreux autres 
ordinateurs (ATARI, MAC INTOSH, IBM et 
COMPATIBLES). 


KEMPSTON DATA : 
Gros Plan sur le futur intégrateur du PCW... La souris veille. 
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Le PCW entre donc dans la galaxie des 
meilleurs. 


Si peu d'autres remarquables nouveautés ne 
méritent un détour, les accessoires ont quant à 
eux, une place de choix. C'est ainsi que de 
nombreuses petites firmes très ingénieuses 
proposent une foule de petits objets en plastique 
moulé d’un grand intérêt. Le premier, le 
PLUNKER 5e colle sur le côté de l'ordinateur et 
permet d'y ranger quatre disquettes de manière 
à les avoir immédiatement sous la main sans les 
laisser traîner sur le bureau. CARA CARA 
propose quatre petits pieds spécialement prévus 
pour l'imprimante du PCW pour la surélever de 
cinq centimètres afin de pouvoir glisser le papier 
dessous. 

Ce même constructeur présente aussi deux 
supports qui permettent de bloquer l'imprimante 
sur le dessus du PCW. C'est tout simple mais 
efficace, l'imprimante ne bouge plus et ne risque 
plus de tomber à la moindre manipulation 
brutale. 


Visiblement, les nouveautés vont bon train et les 
produits en développement ne laissent aucun 
doute sur la volonté des éditeurs anglais de ne 
pas abandonner une machine qui, de toute 
évidence, entame à peine une ère de maturité 
tant ralentie par cette aura de traitement de 
texte incapable de mieux faire... Mais tout n'a 
pas encore été dit ! 


Programmeurs, 
Indépendants, 


Sociétés de 
Services 


ACL 


Pour être inscrits 
dans le catalogue 
du service entreprise 


un seul 
numéro 


[14864455 
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4 4 


RANGS 


UOTES DES LECTEURS 
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INTERACTIF... 


À la demande de certains curieux, je démarrerai cet interacif en 

leur communiquant le dernier courrier qu'il m'a fallu envoyer à 

Chita pour concrétiser notre rupture. (suite à interactif 11 et 12) 

Adieu Chita, je t'ai aimée mais tu voulais m éloigner de mon PCW 

favori. Alors, nous ne pouvions continuer. Tu m'as grogné : “c'est 

lui ou moi", j'ai choisi : “C'est lui!" 

Adieu à tes baisers gouleyants, à tes caresses velues et ton regard 

ému par quelques cacahuètes. Je reviens à ma bête et te laisse 

hébétée, je retourne à l'écran retrouver mes octets, mon fouet, 

mes gagnants, mes p tites notes rotatées qui font frémir la bourse sur le cours du Bihan. 
En hausse, en baisse, ça se passe en “auteur‘* sans hache mais avec un fouet ! 


Je sais que tu me comprendras car tu comprends toujours tout quand tu prends mon 


clavier pour un harmonica et ce joli curseur pour un poux égaré... 


GAGNANT ! 

Voilà votre verdict, lecteurs impitoyables : Chita out ! Olivier COQUIN gagnant ! 
C'est avec le sympathique INVEST + qu'il empoche encore fois la colossale prime de 
1000 F! 


AU SUJET DU VERIFICATEUR 


Le vérificateur B-12 place un REM plus un code en bout de ligne pour nous permettre de 
vérifier que la saisie est conforme à celle du listing publié. Si le principe fonctionne 
parfaitement, pour preuve vos nombreux courriers de félicitations, il s'avère que certaines 
lignes sont perturbées par la présence de ce REM. 

Deux catégories se distinguent : Les lignes de DATA et les lignes de PRINT si le dernier 
message affiché n’est pas clos par un guillemet. La meilleure solution est, provisoirement, 
de supprimer tous les REM et leurs codes quand nous sommes certains que le programme 
est correetement saisi ou mieux, le sauver sous deux noms distincts et passer l'un au 
vérificateur et faire les corrections sur l'autre. 

Quelle que soit la solution adoptée, je suis persuadé que Maître LEDOS nous concoctera 
une version améliorée pour le prochain numéro. 


LA VERITE SUR L'ECHO 10... 

Depuis près de trois mois l'Echo N°10, dit l'Echo aux grandes oreilles, n'était plus 
disponible. Le drame vient du fait que ce numéro spécial communication n'a pas été tiré 
en quantité suffisante pour combler la demande et que nous sommes obligés de le retirer. 
La date de re-sortie est fixée au 6 novembre et les exemplaires seront tenus à la 
disposition de tous les lecteurs qui l'attendent impatiemment. Nous aurons la liste 
complète des lecteurs l'ayant commandé et nous l'expédirons après le salon aux lecteurs 
qui ne l'auront pas demandé. 

Qu'ils nous pardonnent pour ce contre-temps. 


EXTRA ? EXIT ? NON EXPO ! 


La plus formidable concentration d'applications pour PCW s'étalera lors de l'AMSTRAD 
EXPO du 6 au 9 novembre sur près de 6500 M2 et l'Echo sera bien sûr présent sur le 
stand A13 qui sera pour la circonstance, le royaume du PCWisme avancé !. 


L'ECHO AU TOP 


Communiqué par la SOSIS, le score sur les retours de la publicité d'AMSTRAD EXPO place 
l'ECHO en seconde position après Science et Vie Micro et devant tous les autres ! Une 
superbe démonstration de la popularité de votre journal et de l'intérêt que vous 
manifestez à la vie du PCW. Pour être honnête, nous sommes tous extraordinairement 
surpris d'un tel résultat. 


SERVICE ENTREPRISE ENCORE UN SUCCES... 


Les coupons du service entreprise reviennent aussi très très nombreux et nous ont laissés 
pantois. Le plus incroyable à été le constat que plusieurs entreprises ou services 
administratifs comptaient plus de 30 PCW en action ! Autre surprise, les secteurs 
d'activités touchés par la PCWmania sont très diversifiés, industrie, petit commerce, 
médicale, assurance, journaux, télé, radio, agriculture, le PCW est partout pour prouver sa 
polyvalence et sa souplesse. 

Voilà, sur ces quelques remarques extrêmement positives qui ne laissent aucun doute sur 
la place que tient le PCW dans la civilisation moderne et son rôle dans l'économie 
nationale, je retourne à mon clavier programmer la Marseillaise. 

Allons enfants de la PCWmanie le jour de gloire est à river (au mur !) 


M Pierre PAND 
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NE MANQUEZ PAS L'AVENTURE TELEMATIQUE... 


LES EDITIONS NEPTUNE et L’ECHO DU PCW vous proposent... 


L'UNIVERS TELEMATIQUE 


L'ouvrage de référence en matière de communication 





250 F (port et emballage inclus*) 440 Pages au service de la télématique 
Le livre de l'été ! 


Au sommaire : 


Les entrées/sorties (principe) 

Les entrées/sorties de l'ordinateur 

Les entrées/sorties pour aller plus loin 

Le modem 

La codification des données 

La technique des réseaux 

Les réseaux locaux 

Transpac 

Le télétex EC © 
Le développement des réseaux locaux 

La notion de serveur 

L'architecture logicielle d'un serveur 

Serveur à diffusion restreinte 

Le minitel 

L'utilisation du minitel 

Le langage protocole 

Identification d’un minitel 

Tous les modèles de minitels 

La micromatique 

Tous les accessoires du minitel Bibliographie 

Les machines dédiées Tableaux récapitulatifs 
Lexique Cables, logiciels et supports 
Les adresses utiles L'homologation des modems en France 


Cet ouvrage exceptionnel est disponible dès aujourd’hui en retournant à LOGI'STICK 
éditions le bon de commande ci-dessous (ou une copie). 


7 Veuillez me faire parvenir dès réception de ma commande, l'ouvrage de référence 
“L'EVASION TELEMATIQUE"' au prix net de 250 F TTC 


à MME/MELLE/MR) : 2 PRENOM: 





demeurant à : 








code postal : 








VILLE : PAYS : 


Ci-joint mon règlement de 250 F net par unité. Signature obligatoire : 
(* Etranger et DOM TOM : ajoutez 20 F pour participation au frais de port) 


par [ CHEQUE CI CCP MANDAT 


{1} Rayez la mention inutile 


























PROGRAMME BASIC 








[ : DZ) 


TRIFICH 


AUTOMATISEZ 
LA GESTION 
DE VOS DISQUETTES... 


Par Gilles HEAULME 


ES 


PRINCIPE DU PROGRAMME : 


Le programme permettra aux utilisateurs de 
disquettes qui sauvegardent des fichiers ou qui 
stockent des données de retrouver rapidement le 
fichier qui se cache au détour d’une disquette. 








DEMARRAGE DU PROGRAMME : 


Dès que le basic est installé et après avoir tapé 
le programme (ou après l’avoir chargé en 
mémoire à partir de la disquette par 
load‘*TRIFICH”’), tapez RUN. 













L'ordinateur vous demande alors s’il devra vous 
aider lors du déroulement du programme ; si oui 
des aides vous seront données au gré des 
options choisies, si non il faudra voler de vos 
propres ailes (ce n’est pas bien difficile 
heureusement !!!!) 







Dès le départ, le 
menu principal 
(figure 1) 





$ fiches 













à = enr f jee, se présente 

= genen mn 11 S 1°£2 

C = Mige à jour dun fichier à l'écran. 

D = Modification d'un fichier 

£ = 151on et echerche des fiches La remière 

F = Tri du fichier P 

G = Sauvegarde sur disquette opération consiste à 

! = Tout sur prinante choisir l'option ‘‘A” 
= Tout sur Écran pour créer le fichier 

J = Cat Disquette relatif à la disquette 


dont vous souhaitez 
gérer le contenu. 








K = Retour SYSTEM 


Il faut ensuite 
répondre aux 
questions que pose 
l'ordinateur. 








Reponse (A,B,C,D,E,F,G,H,1,J,X) 


Figure 1 Le menu principal 


Vous pouvez alors 
commencer à saisir les composantes du fichier 
soit : 


TRIFICH + L'ECHO DU PCW N°13 










PROGRAMMATION UTILITAIRE 





* le Titre du fichier ex : Janvier 

* le Genre du fichier ex : Inventaire 

* le code du fichier ex : 001 pour 
COMPTA,002 pour MAGASIN... 

* le numéro de disque ex : 1 


Cette opération est à répéter pour chaque fichier 
présent sur la disquette. Ensuite, on sort par 
l'option [F]in et l'on revient au menu principal 
pour attaquer l'option suivante. 


Le choix est alors assez vaste. Soit la mise à jour 
d’un fichier pour continuer la saisie dans le 
fichier en mémoire par l'option [C], soit la 
modification par [D] qui consiste à rechercher la 
fiche à modifier et à entrer son nouveau 
contenu. 


Il est possible de visionner un fichier sur l’écran 
ou d’exécuter une sortie sur imprimante. 


On peut également effectuer des tris ou des 
recherches selon différents critères et d’effectuer 
des corrections et ce, à tout moment, par simple 
retour au menu 


principal Figure 2. La visualisation permet une 


sélection par champ 
En résumé 


sumé, à 
TRIFICH, de LULSIONNNER ETCRES 


par sa simplicité 
d'utilisation, 


T = TOUTES depuis le debut 





vous permettra R = Recherche d'un Titre 
TARIGSMEnEME G = recherche d'un Genre 
gérer comme 

elles le C = recherche par code fichier 
méritent, vos D = recherche par Disc 
disquettes 

pleines à FF. 

craquer de Reponse (T,R,G,C,D,F) 
fichiers aussi 

divers 


qu'intéressants. 






















1G ' HEFÉFÉEEEÉEEEEFEEREEEEREEEEREEEEEEEEEEEEECERERT (LE) 
UE *' (65) 


30 "À TRIFICH #' (KA) 
"+ *#' (67) 
50 ' *X AUTEUR:HEAULME Gilles pour L'ECHO du PCW *' (6K) 
6 '*# x" (69) 
D'+ -+-GHRA-*- X' (LO) 
UE x' (6B) 
"+ (C)ASTAROTH/ASTASOFT 1987 *#' (FV) 
100 ‘* X' (76) 


DO RERO ONOONOOOE PROMO OOOERE  CHT) 

120 ‘' (56) 

130 CARRE EEE OOEPE REPORTER CV) 

145 "INSTALLATION DES CODES DE CONTROLE’ (VR) 

150 ARRET (A3) 

160 CD$=CHR$( 27)" (MY) 

170 VN=cd$+"p"ivfé=cd$t"q"" (49) 

189 cd#=CHR$(27)' (NO) 

190 cls$=cd$+"E"+cd$+"H"" (V1) 

200 DEF FNloc$(C,L)=cd8+"V"+CHR$(32+L)+CHR$(32+C)' (10) 

210 FO$=cd$+"x"+CHRS(32)+CHR$(32)+CHR$(63)+CHRS(121)! (3B) 

220 F2$=cd$+"x "4+CHRS(32)+CHR6(32)+CHR$(SO)+CHRS(ÉS)' (25) 

230 REM HAE EENONMEEREET (UN) 

240 REM GESTION DE FICHIERS' (9L) 

250 REM REROOEOOMEONNEEEEET (UP) 

260 WIDTH 266: PRINT cls$' (35) 

270 PRINT FNloc#(1,0)vn$"TRIFICH"vf$"-#-GHRA-X- (C)1987"! (FE) 
280 FOR X=1 TO 3000:NEXT' (0H) 

290 PRINT cls$' (MM) 

300 PRINT FNloc$(40,2) "VOULEZ-VOUS DE L'AIDE - O/N?"' (B7) 
310 AS=INKEYS' (KA) 

320 IF a$="o" OR a$="0" THEN b=1:G0TO 380' (LO) 

330 IF a$="n" OR a$="N' THEN b=0:GOTD 440' (LJ) 

340 IF a$ Oo" OR a$<>"0" AND a$€>"n" OR a$<>"N" THEN 310' (4 
K) 

350 ZONE 25' (FV) 

360 DIM ad$(509,4)' (02) 

970 ! KÉXEKEEENNEEET (LP) 

330 ' MENU PRINCIPAL" (WP) 

390 ! KAFEEEEEEREERET CLR) 

400 PRINT cls$' (MF) 

410 IF b=1 THEN PRINT'CHOISISSEZ L'UNE DES OPTIONS PROPOSEES P 
QUR CREER MODIFIER, CHARGER OU SAUVEGARDER UN FICHIER, PQU 
R OUVRIR UN FICHIER PRENDRE L'OPTION &A> ":° (K5) 

420 IF B=1 THEN PRINT'ET REPONDRE AUX QUESTIONS QUE L'0 
ROINATEUR VOUS DEMANDE" ' (RW) 

430 L=7000:60SUB 3070' (VF) 

440 PRINT cls$' (MJ) 

450 IF NFé=1 THEN fic$="fiche" ELSE fic$="fiches"' (4D) 

460 PRINT FNloc$(80,0)"-X-GHRA-X-"' (FK) 

470 PRINT FNLOc#(11,2) vn$"TRIFICH"vf$" (PG) 

480 PRINT FNLOc$(24,2) NF:FIC$' (AK) 

490 PRINT FNloc$#(10,5) "A = Ouverture d'un fichier" ‘ (94) 

500 PRINT FNloc$(10,6) “B = Chargement d'un fichier" ‘ (9H) 
510 PRINT FNloc$(10,7) "C = Mise à jour d'un fichier" ‘ (89) 
520 PRINT FNloc#(10,8) "O = Modification d'un fichier'' (DV) 
530 PRINT FNloc#(10,9) "E = Vision et recherche des fiches"" ( 
LC) 

540 PRINT FNLoc$(10,10) "F = Tri du fichier " ! (TU) 

550 PRINT FNloc$(10,11) "G = Sauvegarde sur disquette" L 
FY) 

560 PRINT FNIoc$(19,12) "H = Tout sur Imprimante"' (6C) 

570 PRINT FNloc$(10,13) "I = Tout sur Ecran"' (VE) 

580 PRINT FNloc#(10,15) "J = Cat Disquette"! (UN) 

590 PRINT FNloc$(10,18) "K = Retour 5 Ÿ S T E M'' (WA) 
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600 TEXS$="ABCOEFGHIJK":G0SUB 2930' (Il) 

610 ON K G0TO 870,1030,1240,1480,1330,1760,1970,2140,2840,660, 

770' (HO) 

620 6070 390' (H9) 

630 ! KXRAEKELEREREERET (00) 

640 ‘ CATALOGUE DISQUE’ (0H) 

650 ‘ KKAEKEEEEEEREEERT (02) 

660 PRINT cls$: IF B=1 THEN PRINT'ATTENTION DE BIEN VERIFIER Q 

VE LE DISC SE TROUVE DANS LE LECTEUR QUE VOUS ALLEZ CHOISIR 
SINON IL YŸ À RETOUR AU SYSTEM ,,,"' (SL) 

670 IF B=1 THEN 1=4000:60SUB 3070' (CS) 

680 IF B=0 THEN 690 (Q2) 

690 PRINT CLS$:PRINT FNloc$(10,4) "Quel drive (4/B)' (9J) 

700 TEX$="AB":G0SUB 2930' (14) 

710 IF k=] THEN PRINT cls$:DIR' (BV) 

720 IF k=2 THEN PRINT cis$'DIR b:' (FD) 

730 PRINT vn$"appuyez sur une touche s,v,p'vf$' (74) 

740 ES=INKEVS:IF t$="" THEN 740' (AB) 

750 GOTO 440' (H9) 

760 ‘ #XKX' (A4) 

770 ' EXIT' (E7) 

780 ‘ XH*k#' (A6) 

790 PRINT cls$:IF b=1 THEN PRINT'ATTENTION : AVEZ VOUS SAUVEGA 
ADE VOTRE FICHIER EN COURS CAR EN CAS DE SORTIE IL EST PERDU" 
(SF) 

800 IF B=1 THEN 1=4000:G0SUB 3070' (CN) 

810 IF b=0 THEN 820' (PS) 

820 PRINT c15$:PRINT FNloc$(9,12) "ETES VOUS SUR CO/N) ?"' (IJ 
) 

830 TEX$="ON":GOSUB 2920! (1Y) 

840 IF K=1 THEN SYSTEM' (2C) 

859 IF K=2 THEN GOTO 440' (YU) 

860 ‘ XFKEKKKKEEERREREREEEERERET CAH) 

870 ‘ CREATION NOUVEAU FICHIER' (FC) 

880 ‘ KERKEREREEEEEEERETERERERET CET) 

890 PRINT cls$:IF b=1 THEN PRINT'ATTENTION: LORS DE LA SAISIE 

DES ELEMENTS OU FICHIER, LE BIP VOUS AVERTI QUAND IL YŸ À UN ‘: 
" DEPASSEMENT DE LA LONGUEUR AUTORISEE, EN CAS DE DEPASSEMENT 
VOTRE TEXTE SERA COUPE! l"" (TH) 

909 IF B=1 THEN 1=6000:G0SUB 3070' (CQ) 

910 IF B=0 THEN 920' (PU) 

920 PRINT CIs$:PRINT FNloc$(S,3)vn$ "CREATION D'UN NOUVEAU FIC 

HIER! "vf$" (CM) 

930 PRINT FNloc$(11,6) "( 500 fiches maxi }"' (R3) 

940 PRINT FNloc$(4,11) “est-ce votre preniére création ?"' (LX 
) 

950 TEX$="ON" :GOSUE 2930' (21) 

960 IF k=2 THEN 970 ELSE 1000' (41) 

970 PRINT FNloc$(4,11) “avez vous sauvegardez le fichier précé 
dent?"! (7M) 

980 TEX$="ON":60SUB 2930! (24) 

990 IF K=2 THEN 440' (QA) 

1000 N<U'NF=0:G0SUB 2330 (16) 

1010 NF=N:GOTO 440 ‘ (RW) 

1020 ! KARÉEERELEREERRENET CRI) 

1030 ‘ CHARGEMENT FICHIER! (42) 

1040 ‘ XXEAKEEEOMRENNONNET CRK) 

1050 PRINT cis$:IF b=1 THEN PRINT'ATTENTION DE PLACER DANS LE 

LECTEUR £A> LE DISC CONTENANT LE FICHIER CONCERNE,,,,,,"' (68) 
1060 IF B=1 THEN L=3000:GOSUB 3070' (DK) 

1970 IF B=0 THEN 1080' (SE) 

1080 PRINT CLS$:PRINT FNloc$(2,2)vn$ "LECTURE DU FICHIER DE LA 
DISQUETTE SUR DRIVE A'"vf$! (31) 

1090 PRINT FNIoc$(15,15) "D'ACCORD 7"! (JK) 

1100 TEX$="ON":GOSUB 2930! (31) . 
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1110 IF K=2 THEN 440 ‘ (R7) 

1120 PRINT cis$PRINT'DONNEZ LE NOM OU FICHIER À CHARGER ( 6 € 

aractères maximum }"' (RS) 

1130 INPUT F$' (JJ) : 

1149 IF LENCf$))8 THEN PRINT vn$"NOM TROP LONG'vf$:FOR A=1 TO 

2000:NEXT:G0TO 1120' (LD) 

1150 PRINT CLS$:PRIAT FNloc$(17,5):FICH$=FS PRINT fich$' (K5) 

1169 OPEN "i",#2, FICHS' (VM) 

1170 INPUT #2,NF,FICH$:FOR [=] TO NF:FOR J=0 TO 4: INPUT #2,AD$ 

CL JI'NEXT'NEXT' (GS) 

1180 CLOSE #2' (ID) 

1190 IF NF=0 THEN fi$="fiche" ELSE fi$="fiches"" (00) 

1200 PRINT FNloc$(13, 14) "Il-y-a :'enfifi$ PRINT FNloc#(11,16) 

“ dans le fichier "sfich$'" (RS) 

1210 FOR I=1 TO 2600:NEXT' (1H) 

1220 60TO 440 ' (IE) 

1250 ! XKKEKEREERET (JF) 

1240 ‘ mise a jour " (PP) 

1250 ‘ HXKKEKREEEET (JH) 

1260 PRINT cls$' (NW) 

1270 PRINT FNloc$(1,3)vn$ "SUITE DE SAISIE DU FICHIER EN MEMOI 

RE,"vf$" (40) 

1280 PRINT FNloc$(15,10) "D'ACCORD ?":TEX$= "ON": GOSUB 2930' (I 

P) 

1290 IF Kz=2 THEN 440 ' (RG) 

1300 N=NF+1:60SUB 2330:NF=N' (7E) 

1310 GOTO 449 ' (IE) 

1320 ! HÉKEREREEREEREEEEEEXT (TE) 

1330 ‘ VISIONNER, RECHERCHER" (BM) 

1340‘ KEKERRNEEEEREEE PER (TZ) 

1350 PRINT cls$'IF b=1 THEN PRINT'CE MENU PERMET LA RECHERCHE 

ET LA VISION DE CHAQUE ELEMENT OU FICHIER TOUT EN AYANT LA":" 

POSSIBILITE DE MODIFIER UN ELEMENT DE CE FICHIER EN CAS D'ERRE 

UR QU DE MODIFICATION, ,"' (Q0) 

1360 IF B=1 THEN 1:6000:G0SUB 3070 (E3) 

1370 IF B=0 THEN 1580' (SK) 

1380 PRINT CLS$:PRINT FNloc$(11,3)vn$ “VISIONNNER FICHES: "vf$ 
" (VL) 

1390 PRINT FNloc$(5,7) *T = TOUTES depuis le debut"! (8) 

1400 PRINT FNloc$(5,9) "R = Recherche d'un Titre"' (4L) 

1410 PRINT ENloc$(S 11) "G = recherche d'un Genre“! (4T) 

1420 PRINT FNloc$(5,1$) "C = recherche par code fichier" (F9) 
1430 PRINT FNloc#(5,15) "D = recherche par Disc"' (1J) 

1440 PRINT FNloc$(5,17) "F = FIN,"' (C0) 

1450 TEX$="TRGCOF" :G0SUB 2930  ‘ (B6) 

1460 ON K GOTO 1470,1480,1570,1630,1690,1740 (PO) 

1470 N=1:G0SUB 2690:60T0 1330' (87) 

° 1480 PRINT cis$' (00) 

1490 PRINT cls$:IF b=1 THEN PRINT'LA MISE À JOUR PERMET DE COM 

PLETER UN FICHIER QUI EST EN MEMOIRE ET QUI EST INCOMPLET,, ,"' 
(PS) 

1500 IF B=1 THEN 1=4500:G0SUB 3070' (E2) 

1510 IF B=0 THEN 1620! ($C) 

1520 PRINT c1s$:PRINT FNloc$(6,24)'LINE INPUT "TITRE cherche’" 
NAS: NMS=UPPERS(NM#)" (VG) 

1539 FOR N=1 TO NF' (PV) 

1540 IF INSTR(I,AD$(N,0),NM$))0 THEN GOSUB 2690' (20) 

1550 NEXT' (EI) 

1560 6070 440' (IL) 

1570 PRINT cis$' (00) 

1580 PRINT FNloc#(13,18)/LINE INPUT “GENRE cherche:",GE$:GE$=U 

PPERS(GES)' (B£) 

1590 FOR N=1 TO NF' (Q1) 

1600 IF INSTR(I,AD$CN,1),6E$)>0 THEN GOSUB 2690' (27) 


1620 G0TO 440' (II) 

1630 PRINT cis$' (NX) 

1640 PRINT FNloc$(14,18):LINE INPUT “code/fichier à chercher!" 
,KO$' (18) 

1650 FOR N=1 TO NF' (PY) 

1660 IF ADS(N,2)=K0$ THEN GOSUB 2680' (H9) 

1670 NEXT' (EL) 

1660 60TO 440' (10) 

1690 PRINT cls$' (03) 

1700 PRINT FNloc#(14,18):LINE INPUT "DISC recherche!" DR$:DR$= 
UPPER$S(DR$)' (DW) 

1710 FOR N=1 TO NF' (PV) 

1720 IF ADS(N,3)=DR$ THEN GOSUB 2690' (H3) 

1730 NEXT' (EI) 

1740 60TO 440' (IL) 

1750 ‘ #44! (AA) 

1760 ' tri' (D6) 

1770 ‘ #44! (AC) 

1780 PRINT cls$'IF B=1 THEN PRINT'VOUS AVEZ LA POSSIBILITE DE 

FAIRE EXECUTER UN TRI OU FICHIER SOIT PAR TITRE SOIT PAR GENRE 
MIN EN FONCTION DE VOS BESDINS"' (A0) 

1790 IF B=1 THEN 1:3500:G0SUB 3070' (EC) 

1800 IF b=0 THEN 1810' (SG) 

1810 PRINT CLS$' (NK) 

1820 PRINT FNloc#(7,19) "par Titre ou par Genre ?'"' (SU) 

1830 tex$="T6":GOSUB 2950'IF k=1 THEN t=0' CRT) 

1840 IF k=2 THEN t=l' (SN) 

1850 PRINT CLS$' (01) 

1860 PRINT FNloc#(12,3) "TRI DU FICHIER:"" (65) 

1870 PRINT FNloc$(15,10) "D'ACCORD ?":TEX$="ON":GOSUB 2930:1F 

K=2 THEN 440 ' (68) 

1880 PRINT FNloc#(15,20) "Patience, , ,"' (N4) 

1890 F=0:FOR J=1 TO NF' (WL) 

1900 IF AD$(J,T)>=AD$(J-1,7) THEN 1920' (IT) 

1910 FOR R=0 TO 4:AD$C0,R)=AD$CJ,R):AD$(J,R)=AD#(J-1 R):ADS(J- 
1,R)=AD$(O,R):NEXT'F=| ! (L4) 

1920 NEXT' (EJ) 

1920 IF F=1 THEN 1890 ‘ (SX) 

1940 PRINT CHR$(7)' (RD) 

1950 GO0TO 440 ‘ (10) 

1960 ‘ KAFKEEEREEEEREREENEERT (UD) 

1970 ‘ SAUVEGARDE FICHIER! (51) 

1980 ‘ KAÉKKEEEOEEEEEOOODEERT (VF) 

1990 PRINT cls$:IF b=1 THEN PRINT'AVANT D'EXECUTER LA SAUVEGAR 
DE, VERIFIER QUE LE DISC EST BIEN DANS LE DRIVE <A> ET QU'IL": 
" SOIT BIEN FORMATER ET QUE LA PROTECTION SOIT FERMEE,, ,“' (EE 
} 

2000 IF b=1 THEN L=6000G0SUB 3070' (DV) 

2010 IF B=0 THEN 2020' (S4) 

2020 PRINT CLS$:PRINT FNloc$(4,2)VN$ "ENREGISTREMENT SUR LA DI 
SQUETTE SUR DRIVE A"vfs' C1V) 

2030 PRINT FNLOC$C15,15)"D'ACCORD ?":TEK$="ON" :GOSUB 2930' (10 
} 

2040 IF K=2 THEN 440' (RA) 

2050 PRINT cIs$:PRINT'OONNEZ MAINTENANT UN NOM AU FICHIER QUE 

VOUS VOULEZ SAUVEGARDER (8 caracteres)"' (XN) 

2060 INPUT F$' (JM) 

2070 IF LEN(F#)>8 THEN PRINT vn$"NOM TROP LONG"vf$:FOR a=1 TO 

2000:NEXT'PRINT cls$:G0TO 2050! (56) 

2080 FICH$=FS" (J3) 

2090 OPEN "O",#2, FICH$' (VV) 

2100 WRITE #2,NF,FICH$:FOR I=1 TO NF:FOR J=0 TO 4:WRITE #2, AD$ 
CI,JI'NEXT'NEXT' (60) 

2110 CLOSE #2' (17) 

2120 60T0 440 ‘ (IE) 


1610 NEXT' EE — 
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2130 ‘ HERKERREER! (19) 

2140 ' SORTIE IMPRIMANTE’ (40) 

2150 ‘ XAXKKEREXAT (IB) 

2160 PRINT cis$:1F b=1 THEN PRINT'LA SORTIE IMPRIMANTE VOUS PE 

RMET DE SAUVEGARDER LES ELEMENTS DE VOTRE FICHIER SUR PAPIER"; 

(VERIFIER LA MISE EN PLACE DU PAPIER ET SON ALLIGNEMENT, ,“' (P 

D 

2170 IF B=1 THEN 1=5000:G0SUB 3070' (E2) 

2180 IF B=0 THEN 2190' (SK) 

2190 PRINT CLS$:PRINT FNloc$(9,4)vn$ "SORTIE SUR IMPRIMANTE: v 

fs" (lu) 

2200 PRINT FNloc#(15,10) "D'ACCORD ?"' (J9) 

2210 TEX$="ON":60SUB 2930:1F K=2 THEN 440' (Q1) 

2220 PRINT CLS$:PRINT FNloc#(9,4) "Preparez l'Imprimante,"' (Q 

@) 

2230 PRINT FNloc#(8,9) "puis pressez une Touche ,"' (93) 

2240 PRINT FNloc$(l,1)' (Y2) 

2250 WHILE INKEY$="" VEND! (58) 

2260 LPRINT CHR$(27)"R"CHRS(T):SPCC(7S-LENCFich#))/2):fich$" 

(WF) 

2270 LPRINT:FOR I=1 TO NF' (4J) 

2280 LPRINT'I :LPRINT ,"-":AD$(1,0),":":AD$CI,1),' (39) 

2290 LPRINT "CODE FICHIER: ":AD$CI,2),:LPRINT ," -disc- "'AD 

SCI SD NEXT! (43) 

2300 LPRINT STRING$(78,"-")' (BE) 

2310 GOTO 440 ‘ CIF) 

2320 ! KRXKREREEEEREEERETT (RM) 

2330 ' SAISIE DES DONNEES' (3P) 

2340 ! KÉXEREREREREEREEERT (RD) 

2350 PRINT cls$' (NX) 

2360 DIM no$(500,4)' (Q3) 

2370 PRINT FNloc$(9,1)vn$ "SAISIE FICHE NUMERO'vf$:N' (EG) 

2380 IF N€100 THEN 2450 (VL) 

2390 HO$CN,O)=AD$CN,0)' (VE) 

2400 PRINT FNloc#(14,4) MOS(N,0)' (BU) 

2410 PRINT FNloc#(7,4)'LINE INPUT "TITRE, ",ADS(N,0):AD$(N,0)= 

UPPERSCADS(N,0))' (FE) 

2420 IF LENCADS(N,0))C1 THEN AD$CN,0)=MOS$(N, 0)" CUR) 

2430 IF LENCADS(N,0)))14 THEN ADS(N,O)=LEFTS(ADS(N,0),14):PRIN 

T CHRS(7)' (VS) | 

2440 6010 2500" (JU) 

2450 MO$(N,0)=AD$(N,0)' (VB) 

2460 PRINT FNloc$(14,4) AD$(N,0)' (BD) 

2470 PRINT FNloc#(7,4):LINE INPUT "TITRE: ",ad$(n,0)'ad$(n,0)= 

UPPERS(ad$(n 0))' (FK) 

2480 IF LENCADS(N,0))1 THEN ADS$(N,0)=MO$CN,0)' CUX) 

2490 IF LENCADS(N,0))>1S THEN ADS$(N,O)=LEFTS(ADS(N,0),15):PRIN 

T CHR#C7)' (20) 

2500 MOSCN,1)=AD$CN,1)' (V9) 

2510 PRINT FNloc$(14,6) MOS(N,L)'LINE INPUT "GENRE, ",ADSCN, 1) 
! (NL) 

2820 IF LENCADSIN,1))€1 THEN AD$CN,1)=MOS$CN,1)' (UV) 

2530 IF LENCADS(N,1))918 THEN ADSIN,1)2LEFTS(ADSCN,1),18):PRIN 

T CHR#(7)' (24) 

2540 MOSCN,2)=ADS$CN,2)' (VF) 

2550 PRINT FN1oc$(20,8) MOS(N,2):LINE INPUT “CODE FICHIER: "A 

DS(N,2) ' (ZE) 

2560 IF LENCADS(N,2))€1 THEN ADS$(N,2)=MO$(N,2)' (V2) 

2570 IF LENCADS(N,2)))3 THEN ADS$CN,2)=LEFTSCADS(N,2),3) PRINT 

CHRS(7) ! (WB) 

2680 MOSIN,3)=AD$IN, 3)" CVL) 

2590 PRINT FNIoc$(19,10) MO$(N,3)' (DL) 

2600 LINE INPUT "DISQUE N° : ",ADS(N, 3) ADS$(N, 3)=UPPERS(ADS(N, 

3)) ‘ CRV) 

2610 IF LENCADS(N,3))41 THEN ADSCN 3)=MO$CN,3)' (V1) 
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2620 ERASE MOS' (LG) 
2630 PRINT FNloc$(1,18) "SUITE ($) , ERREUR CE) , FIN CF) ©" 
(CT) 
2640 TEX$="SEF":GOSUB 2930' (54) 
2650 IF K=1 THEN N=N+1:6070 2330' (B0) 
2660 IF K=2 THEN 2330' (SU) 
2670 RETURN! (J3) 
2680 ‘ KEXKAAERAAREXEREEEET (T1) 
2690 ‘ AFFICHAGE SUR ECRAN. (55) 
2700 ‘ XAREEESREEEEEESRESET (SU) 
2710 PRINT cls$' (NX) 
2720 PRINT FNloc#(9,1)vn$ "VISION FICHE NUMERO'vF$;N' (EV) 
2730 PRINT FNloc$(7,4) "NOM: ":ADS(N,0)' (LQ) 
2740 PRINT FNloc$(7,6) "GENRE : ":AD$(N,1)' (PL) 
2750 PRINT FNloc$(7,8) “CODE FICHIER: “:AD$CN,2) 
2760 PRINT FNloc#(7,10) "DISC : "'AD$(N,3)' (00) 
2770 PRINT FNloc$(l,18):PRINT "Precedent , Suivant , Modifier 
, Fin“! (2H) 
2780 TEX$="PSMF":GOSUB 2930:0N K GOTO 2790,2810,2330,2830' (EU 
) 
2790 N=N-1'IF N=0 THEN PRINT CHR$C7):N=1' (QG) 
2800 GOTO 2710! (JK) 
2810 N=N41:IF NONF THEN PRINT CHR$C7):N=NF' (VR) 
2820 GOTO 2710' (J2) 
2830 RETURN' (J1) 
2840 PRINT cls$:FOR i=1 TO nf' (95) 
2850 IF i<100 THEN 2870' (VO) 
2860 IF LENCADS(1,0))>14 THEN AD$CI,0)=LEFTS(ADS$(I,0),14)' CO 
) 
2870 PRINT L':PRINT'AD$(I,0),":":AD$(1,1),' (TG) 
2880 PRINT "code fichier! *:AD$CI,2),:PRINT "disc! ":AD$CI,3) 
FOR d=1 TO SOO:NEXT'NEXT' (S5) 
2890 PRINT vn$"liste terminee tapez sur une touche s,v,p'vfs 
" (VO) 
2900 t$=INKEYS:IF t$="" THEN GOTO 2900 Ra 
LL) 
2910 GOTO 440' (IL) 
2920 ‘ HXKKREEEEEEREREEEEEEET (VA) 
2930 ‘ SOUS-PROGRAMME DIVERS' (C2) 
2940 ‘ RAKKRÉEEREEEEREEREEEET (VC) 
2950 LT=LENCTEXS)R$=""! (07) 
2960 PRINT FNloc$(0,24) TAB(4) “"' (BB) 
2970 PRINT FNloc$(14-1t,23) * 
" (87) 
2980 PRINT FNloc#(20-1t,23) " Reponse ("; 
(QI) 
2990 FOR I=1 TO LT-l' (S2) 
3000 PRINT MIDSCTEXS,1,1):" "1 :NEXT' (K5) 
3010 PRINT RIGHT$(TENS,1):")"" (9A) 
3020 TEXS=UPPERS(TEXS)' (OT) 
2030 WHILE R$=""'R$S=INKEYS VEND! (F3) 
3040 R$=UPPERS(RS):K=INSTR(TELS,R$)' (M2) 
3050 IF K=0 THEN R$="":PRINT CHR$(7)::G0TO 3030! (YK) 
3060 RETURN' (IX) 
3070 FOR K= 1 TO L'NEXT:RETURN' (D8) 


" (10) 
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DISPONIBLE SUR PC ET COMPATIBLES 
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AST 


POUR PCW 8256/8512 
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Tout 
sur votre personnalité. 


ASTRO 1 


e Carte thème de 
naissance 

e Carte du ciel de 
naissance avec maisons, 
signes, planètes et 
aspects majeurs 

e Interprétation du thème 
de naissance 

e Personnalité profonde et 
ambition 

e Fichier de plusieurs 


centaines de personnes. 
v— 















Sachez ce que l'avenir 
vous réserve. 


ASTRO 2 


Comme ASTRO 1 avec en 
plus : 


e Calcul et édition des 
révolutions solaires 
année par année 


e Carte du ciel de chaque 
Révolution solaire 


e Interprétation du 
potentiel de l’année : 
Amour, argent, travail, 
santé, etc. 

NI 





La version complète 
des initiés. 


ASTRO 3 

Version incluant ASTRO 2 
+ ASTRO COUPLE avec en 
plus : 

e Révolutions lunaires 


e Directions Primaires 
{avec pôles des planètes) 


° Directions Progressées 
et Symboliques 


e Calcul du Maître de 
Nativité selon la méthode 


de Volguine. 
co) 


À 





N 


Découvrez 

votre entourage. 
ASTRO COUPLE 
e Carte du ciel composite 
° Aspects planétaires 

e Comparaison des thèmes 


e Interprétation des 
relations du couple 
{plusieurs pages) 
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Cher lecteurs, 


Nous recevons, chaque jour, de plus en plus de 
courrier et si nous le lisons, nous ne pouvons pas 
toujours y répondre. Voilà pourquoi : 

L'Echo ne peut pas se substituer aux éditeurs qui 
connaîssent, normalement, parfaitement leurs 


produits. Il est logique qu'ils vous aident si vous leur 
avez accordé votre confiance et que tout n'est pas 
toujours clair. De la même façon, l'Echo du PCW n'est pas le service 


COURRIER 





après vente d'AMSTRAD... Notre mission est d'aider le plus grand nombre de 
personnes en recensant les questions qui reviennent régulièrement, pas de dépanner, au coup par 
coup, chaque utilisateur pour chaque problème qu'il rencontre dans sa vie commune avec le PCW et 


ses accessoires. 


Nous avons essayé et... ça ne marche pas ! Essayant de répondre à chacun, nous avons fini par 


oublier l'essentiel : L'ECHO ! 


Maintenant, et pour tenter de fixer clairement notre domaine d'intervention, nous avons mis en place 

un service technique qui tient permanence téléphonique les Mardi et Jeudi de 9h à 13h. 

Les questions pouvant être réglées par ce service sont : 

- Problèmes avec les articles de l'Echo, avec les disquettes Echo ou thématiques 

- Questions techniques relatives aux produits LOGI'STICK. 

- Propositions d'articles et de programmes (par courrier exclusivement) 

- Demandes d'informations techniques relatives à tout autre problème particulier devront être faites 
par courrier exclusivement accompagné d'une lettre timbrée à votre adresse 


Les suggestions, conseils, trucs et avis sont comme toujours bienvenus et lus avec attention. Sachez 
que l'Echo évolue totalement en fonction de cela et pardonnez-nous de ne pouvoir toujours donner 
suite. En vous remerciant d'avance de votre compréhension. 


M. ALEX DEGRANGE 
97 GOURBEYRE 


Je voudrais simplement apporter une modeste 
contribution au programme MONITEUR DE 
DISQUETTES paru dans le n°11 de L'Echo du. 
PCW. 


1. Il n’est pas inintéressant de vouloir 
personnaliser le message de CP/M : 
“PCW 8256 CP/M Plus Amstrad Consumer 
Electronics plc 
D'où l’idée de l’utilisation du programme 
MONITEUR. 
On commence la recherche de la chaîne 
“Amstrad Consumer Electronics plc‘ à partir de 
la deuxième entrée de J14FCPM3.EMS au 
directory (ou J12FCPM3.EMS pour les anciennes 
versions), c'est-à-dire à partir du bloc 12. On 
cherche les coordonnées de ce bloc 12 par 
l'option 2 du menu suivant : 

Conversions 

(1) COORDONNEES-N° BLOC 

(2) N° BLOC-COORDONNEES 
Puis après s'être placé sur les pistes et secteurs 
trouvés, on commence la recherche de la 
chaîne. La découverte est rapide, et pour ma 
part, je l'ai trouvée en Piste 02 Secteur 09, 
Adresse 033. 
Ensuite on peut modifier cette chaîne par 
l'option CORRECTION dans la zone des codes 
ASCIT. ATTENTION A NE PAS DEBORDER. 


2. Lors des recherches qui sont parfois très 
longues, on a grand plaisir à entendre un ‘‘bip‘‘ 
sonore lors de chaque découverte. Pour ce faire, 





La rédaction 


on modifie la ligne 1400 du programme comme 
je vous l’indique : 

1400 IF X=P +1 THEN TR =TR + 1:PRINT BIP$;:ST(TR, 1)... 
J'espère vous envoyer d’autres trucs et encore 
bravo pour ce programme riche et évolutif. 


L’ECHO 


Merci pour ces tuyaux qui vous font ainsi 
bénéficier de cinq disquettes (vierges !). Nous 
tenons toutefois à préciser que l'exemple que 
vous communiquez est donné à titre indicatif et 
que chacun relise les conditions de licence 
indiquées par AMSTRAD dans son manuel avant 
de l’effectuer… 





M. HJ. 
94 FRESNE 


Je vous propose le truc suivant : 


Le Logo permet la sauvegarde d’image-écran 
tout comme l’Exbasic, mais le codage n'étant 
pas le même, on ne peut pas directement les 
récupérer. Voilà comment faire : 

Supposons que nous ayons un écran sauvé en 
Logo par ‘‘dessin.pic* 

Faire en Logo : setsplit 1 fs loadpic ‘‘dessin 
[RETURN] 

Une fois l’écran rempli, appuyer successivement 
sur [ALT] + [EXIT] puis la touche [X] deux fois et 
[RETURN]. Le curseur se place alors en haut à 
gauche. Il ne reste plus qu’à faire ? bye 
[RETURN]. 
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COMMENT SAISIR UN PROGRAMME 


On revient alors sous CP/M sans effacer l’écran, 
on charge Exbasic et on fait PRINT 
‘‘isave.(nom.ext)"* [RETURN] on a ainsi sauvé 
l'écran sous le titre ‘‘nom.ext‘‘ que l’on peut 
recharger sous Exbasic par PRINT 
‘‘oad.(nom.ext)"" [RETURN]. 


L’'ECHO 


Excellent tuyau qui ravira les fans d’Exbasic... Et 
cinq disquettes (toujours vierges !) gratuites, 
cinq ! 


D' SALTRE GEORGES 
84 APT 


Je suis abonné à votre revue depuis le début et 
j'utilise un PCW 8256 depuis février 86 pour 
mon secrétariat avec une totale satisfaction. 


Cet ordinateur est parfaitement adapté au 
secrétariat médical et permet à peu de frais 
d'éditer des ordonnances pré-imprimées, des 
fiches conseils, etc. 

Je m'étonne de n'avoir jamais lu un seul article 
dans votre revue qui fasse le point sur les 
possibilités médicales du PCW. 

Si la gestion des dossiers lui est interdite, mais 
c'est un problème ardu, il serait tout à fait 
capable d’assumer la comptabilité si un logiciel 
lui était dédié. Tout le monde n’a pas le loisir 
ou l'envie de se lancer dans Multiplan ! 

Si l'on met à part cette gestion de dossiers, qui 
demande plus de contraintes qu’elle n'offre 





EN BASIC MALLARD 


La façon de saisir un programme Basic à fait 
l’objet d'une étude approfondie dans l’'Echo du 
PCW N°1 in ‘‘Un départ saisissant‘ qui reste 
complémentaire au livre 2 livré avec les PCW. 
Résumé : 

Allumez l'ordinateur et insérez la face 2 de la 
disquette système. A l'affichage de ‘‘A>‘* tapez 
BASIC suivi d'une pression sur [RETURNI. Une 
fois sous basic, lancez la numérotation 
automatique par AUTO + [RETURN]. 


A chaque numéro de ligne affiché, tapez son 
contenu conformément au listing de l’article. 


Pour sortir du mode AUTO afin de corriger une 
ou plusieurs lignes, tapez [STOPI]. 


Pour corriger une ligne, tapez EDIT suivi de son 
numéro et d’une pression sur [RETURN]. 
Exemple : EDIT 10 [RETURN] 


Pour lister sans corriger, tapez LIST [RETURN]. 
Exemple : LIST 10 [RETURN] ou LIST -100 
[RETURN] ou LIST 10-100 [RETURN] ou LIST 
[RETURN] 


Faites des sauvegardes régulières du programme, 
même en cours de saisie, en mettant une 
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COURRIER 


d’avantages immédiats, je pense que 
l’informatique à un bel avenir chez les médecins 
pour peu qu’il y ait sur le marché de quoi 
alimenter un PCW ou un PC sans devoir mettre 
dans un logiciel plus cher que dans la machine. 
(les médecins seraient sûrement sensibles à un 
beau graphique leur montrant la progression de 
leurs frais et de leurs revenus !) 


L’ECHO 


Le ciel vous à probablement entendu puisque 
TELESOFT met à votre disposition des logiciels 
dévoués à votre profession et que venant de les 
recevoir, nous en présentons quelques 
caractéristiques marquantes dans les News du 
mois. 


Nous espérons pouvoir décortiquer ces logiciels 
très bientôt mais nous avons besoin des conseils 
avisés d’un médecin prêt à servir de cobaye... 
Pour une fois ! 

De la même façon, tous les utilisateurs de 
MEDITOR, PEDIAMASTER ou MEDIFISC peuvent 
nous envoyer un petit mot avec leurs 
impressions, cela nous aidera dans nos critiques. 


Enfin, votre avis sur le prix des logiciels 
verticaux est judicieux mais commence à être 
démenti par une nouvelle génération de 
programmes qui allient qualité et performance à 
des coûts très inférieurs à ce que le marché 
présentait jusqu'alors. 

Le problème reste toujours relatif à 
l'information... Qui fait quoi et où le trouver. 


disquette vierge en A et en tapant : 
SAVE ‘‘Nom du programme‘ [RETURN]. 
Exemple : SAVE ‘ECHO [RETURN]. 


Conseils : 


Ne lancez jamais un programme avant d’en 
avoir fait une sauvegarde. 

Utilisez les mêmes noms que ceux conseillés par 
l’auteur (dans son article ou sur la disquette qui 
l'accompagne). 

Vérifiez ligne par ligne que ce que vous avez 
tapé est strictement identique à ce qu'indique le 
listing. Soyez particulièrement vigilant dans les 
cas suivants : 

Ne confondez pas : point virgule et deux points, 
point et virgule, i majuscule et 1 minuscule ou le 
chiffre 1. 

Respectez : les espaces, les guillemets, les REM 
et les numéros de lignes. 

Ne modifiez pas un programme avant d’être 
certain qu'il fonctionne totalement. 

Les erreurs se produisent rarement dans la ligne 
responsable de celles-ci. Seule SYNTAX ERROR 
ou erreur de syntaxe dans la saisie, arrive dans 
une ligne mal écrite. c'est pour cette raison que 
le basic Mallard l'édite automatiquement. 

Dans tous les cas, reportez-vous à l'annexe Il 
du manuel Amstrad. 


à, STARGRAPHIC 
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RperR 


Du 6 au 9 Novembre 
Parc des Expositions - Porte de Versailles - Paris 


PLUS VITE ET MOINS CHER 


Nom __ Prénom 
Adresse L 
Code Postal Ville 


l'évite les files d'attente. je souhaite réserver dès aujourd'hui, au tarif préférentiel de 20 F 


(au lieu de 25 F). Je joins un Chèque postal où bancaire et une enveloppe timbrée pour la 


Nous vous ferons parvenir votre entrée. 


LE MORDANT INFORMATIQUE 


Coupon réponse 4 Fétourner a S O SES IST rue Marcadet 7S018 Paris av ce une env cloppe timbree à VOrre adresse 
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Mende: Fcar 


